Coneccion mysql y msAccess desde Visual Basic (Driver ODBC)

Hola, en este post voy a explicar mas o menos como se debe realizar una coneccion a mysql y a msaccess utilizando el driver ODBC (open database conection) desde Visual Basic utilizando Visual Studio 2012 en windows 8, Todo bajo arquitectura de 64 bits.

Lo primero que vamos a hacer es instalar mysql para 64 bits junto con el driver ODBC de mysql que podemos descargar desde el siguiente enlace (Descargar el MSI que pesa mas):

http://dev.mysql.com/downloads/installer/5.6.html

Desde ahi podemos instalar el driver y mysql server para 64 bits ambos.

Paso 1: Vamos a configurar un origen de datos obdc con la ayuda de el asistente que lleva el mismo nombre, para ello en win8 vamos al menu y escribimos “ODBC”
de la siguiente manera:



Paso 2: Configuramos un nuevo origen de datos en la siguiente pantalla:


Paso3: Damos click en agregar y escogemos ODBC ANSI driver para MySQL. A este
paso es importante revisar que dicha configuracion la estamos realizando para 64
bits.



Paso 4: Damos click en finalizar y llenamos los campos con la informacion referente
a nuestra coneccion.



Paso 5: Hacemos una prueba de la coneccion y damos click en ok, es importante
darnos cuenta que el nombre que coloquemos al campo “Data Source Name” es el
que nos va a permitir identificar nuestro origen de datos desde VB.



Paso 6: De paso configuraremos datasource para Msaccess en la imagen del paso 3
escogemos “Microsoft Access Driver *.mdb,*.accbd” esto nos permitira configurar el
nuevo origen de datos y damos click en finalizar.



Paso 7: Escogemos la ubicación de nuestra base de datos creada en msAccess y le
ponemos un nombre a la coneccion yo le puse msaccess y escogi mi base de datos
llamada prueba.accbd y damos click en ok.



Paso 8: Verificamos los origenes de datos que tenemos configurados hasta ahora,
contamos con una llamada “mysql” y otra llamada “msaccess”.



Paso 9: Vamos a Visual Basic y creamos un nuevo proyecto al cual llamare “Practica
9” de tipo windows form y la interfaz nos debera quedar de este modo:



Paso 10: LA APLICACION EN VISUAL BASIC

Los espacios de nombres usados para realizar la coneccion son los siguientes:

Imports System.Data
Imports System.Data.Odbc

Ahora creamos un objeto de tipo “OdbcConnection” que es el objeto que
almacenara la coneccion:

Public coneccion As OdbcConnection

Dentro del codigo del evento del boton Conectar:
MYSQL


Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Try
coneccion = New OdbcConnection("dsn=mysql")'ponemos el nombre del origen de datos q conf antes
coneccion.Open()'abrimos la coneccion
Label1.Text = "Coneccion Exitosa a mysql"
Button4.Enabled = True
Button1.Enabled = False
Catch ex As OdbcException
Label1.Text = "Error"'En caso de generarse un error lo mostramos
MsgBox(ex.Message, MsgBoxStyle.Information)
End Try


Msaccess


Try
coneccion = New OdbcConnection("dsn=msaccess")'Recuerden el nombre q le 'pusimos al origen de datos
coneccion.Open()
Label1.Text = "Coneccion Exitosa a msAccess"
Button4.Enabled = True
Button1.Enabled = False
Catch ex As OdbcException
Label1.Text = "Error"
MsgBox(ex.Message, MsgBoxStyle.Information)
End Try


NOTA: Con esto ya estariamos conectandonos a mysql y a msaccess. Los demas
botones los explicare en la practica y en el video.