hola
miren tengo este codigo que es para hacer una conexion con una base de datos
MySQL pero me tira error y la verdad que no se que pueda ser. si alguien me puede ayudar se lo voy a agradecer.
saludos
Cita: Dim AdoS As New adodb.Recordset
Dim Cxn As adodb.Connection
Dim CxnFac As String
CxnFac = "Driver={MySQL ODBC 3.51 Driver};Server=" & TxtServer.Text & ";Port=3306;Option=" & TxtOptions.Text & ";Stmt=;Database=" & TxtDatabase.Text & ";Uid=" & TxtUser.Text & ";Pwd=" & TxtPass.Text & ";"
Cxn.Open CxnFac ' Abrimos la conexion
Set AdoS = New adodb.Recordset
AdoS.Open "SELECT * FROM usuarios", Cxn, adOpenStatic, adLockOptimistic ' Abrimos el REcordset y esta listo para usar