Prueba de conexión Visual Basic 6 y MySql 3.15
Qué tal, recientemente en el trabajo me pidieron agregar un modulo a una aplicacion hecha en VB6 el cual necesitaba conexion a un servidor remoto
Aqui un script de la conexion a MYSQL
Es necesario instalar ODBC MYSQL (en este caso 3.15)
**Fuente www.forosdelweb.com
Saludos!
Aqui un script de la conexion a MYSQL
Es necesario instalar ODBC MYSQL (en este caso 3.15)
Sub conectarBD()
Set Conexion = New ADODB.Connection
Conexion.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=
ip_de_tu_base
;DATABASE=nombre_de_tu_base;UID=tu_user;PWD=tu_password;OPTION=3"
Conexion.Open
Conexion.CursorLocation = adUseClient
A = Conexion.State
If A = 1 Then
MsgBox ("Base de Datos Conectada")
End If
End Sub
**Fuente www.forosdelweb.com
Saludos!
Comentarios
Publicar un comentario