AntonioPrera1

Yo Instale la Version “MySQL Connector/ODBC Una vez Instalado (Next o Siguiente a todo) ya tendremos el Proveedor instalado De ahi es el mismo codigo que se usa para conectarse a cualquier Motor Usando ADO Paso 1.- Hacer la Referencia a la Libreria ADO Paso 2.- Escribir el Codigo ------------------------------------------------------------------------------------------------------------------------------------------------------ Dim cn As Connection Dim rs As Recordset Private Sub Form_Load() Const strServidor = "localhost" Const strBaseDatos = "basededatos" Const strPassword = "mypassword" Const strUsuario = "root" Set cn = New Connection cn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver}; SERVER=" & strServidor & _ "; DATABASE=" & strBaseDatos & _ "; User=" & strUsuario & _ "; Password=" & strPassword & "; OPTION=3" cn.Open Set rs = New Recordset rs.Open "select * from Tabla", cn, adOpenStatic Me.Caption = rs.Fields(0).Value cn.Close End Sub ------------------------------------------------------------------------------------------------------------------------------------------------------ Eso es todo un poderoso Motor de Base Datos y Gratuito