Programación General > VBA

 Conectar Excel Con Mysql

(1/1)

mveraa:
hola maestros necesito saber como conectar excel con mysql para realizar consultas , lo que he leido me indica que debo partir asi:

Dim cn As ADODB.Connection

pero lamentablemente no me sale nada con ado.  osea pogo

dim cn as ...      deberia salirme una lista donde estubiera adodb , pero no me sale . ¿tendre que instalar algo mas?


un saludo

F_Tanori:
hola mveraa mira qui esta un codigo para conectarte por ADO y ODBC (para lo cual requieres el driver MySQL-ODBC 3.51 o la version 5.0 para mysql 5 MySQL-ODBC 5

teniendo el driver correcto, ya puedes conectarte de esta manera por ejemplo...



--- Código: Text --- Private Sub CommandButton1_Click()  Dim cnn_Conexion As Connection  Dim rs_Tabla As Recordset  Dim ls_Servidor As String, ls_BaseDatos As String  Dim ls_Usuario As String, ls_pwd, ls_Cnn As String  Dim ls_SQL As String      ls_Servidor = "localhost"  ls_BaseDatos = "bd_405461"  ls_Usuario = "vb"  ls_pwd = "xAc"  ls_SQL = "Select * from t_menus"    ls_Cnn = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=" & ls_Servidor & ";DATABASE=" & ls_BaseDatos & ";USER=" & ls_Usuario & ";PASSWORD=" & ls_pwd & ";OPTION=3"    Set cnn_Conexion = New Connection  Set rs_Tabla = New Recordset    cnn_Conexion.Open (ls_Cnn)    rs_Tabla.Open ls_SQL, cnn_Conexion      'Si todo es correcto mostrara el nombre del primer campo, y su contenido  ' en el primer registro    MsgBox rs_Tabla.Fields(0).Name & "= " & rs_Tabla.Fields(0)        'Cerrar y 'destruir' las varibles  rs_Tabla.Close  cnn_Conexion.Close  Set cnn_Conexion = Nothing  Set rs_Tabla = Nothing      End Sub  
Ahora si no te aparecen los objetos de la liberia ADO es porque no la tienes agregada como referencia para hacer esto tienes que ir al menu Herramientas\Referncias en el cuadro de dialogo seleccionas

Microsoft Activex Data Object  2.x Library (segun al version a utilizar)

con esto la te apareceran en la lista despues del punto

Suerte

mveraa:
muchas gracias por la orientacion.

alexm0428:
Hola.
Cuado dices:


--- Cita de: "F_Tanori" ---Microsoft Activex Data Object  2.x Library (segun al version a utilizar)

--- Fin de la cita ---

Como se que version usar? Me aparecen desde 2.1 hasta 2.8 y no se con que criterio se escoje.

Gracias

F_Tanori:

--- Cita de: "alexm0428" ---Hola.
Cuado dices:


--- Cita de: "F_Tanori" ---Microsoft Activex Data Object  2.x Library (segun al version a utilizar)

--- Fin de la cita ---

Como se que version usar? Me aparecen desde 2.1 hasta 2.8 y no se con que criterio se escoje.

Gracias
--- Fin de la cita ---

Pues en este caso yo elegiria la mas reciente  :rolleyes:  que se supone debera soportar a las anteriores, habran corregido errores, le habran agregado mas funcionalidades,soporte para mas bases de datos,nuevas "tecnologias" como xml,mejorado algunos proceso, mejor rendimiento, mejor seguridad etc. ... la verdad es que no sabria darte las diferencias entre una y otra, tendrias que revisar el historial de cambios de las librerias.

Pero mi criterio seria ese usar la mas reciente...


Saludos

Navegación

[0] Índice de Mensajes