conexion a sql con adodc
como puedo generar una conexion a un servidor SQL mediandte un adodc en visual basic para poderla conectar a una base de datos
con adodb. simplemente lo siguiente:
Public Function conectar()
Set conn = New ADODB.Connection
Set rst = New ADODB.Recordset
Dim consql As String
'Conexion con Mysql
consql = "DRIVER={MySQL ODBC 3.51 Driver};" & _
"SERVER= servidor;" & _
"DATABASE=basedatos;" & _
"UID= usuario;" & _
"PASSWORD=password;" & _
"OPTION=3;"
conn.Open consql
End Function
Public Function conectar()
Set conn = New ADODB.Connection
Set rst = New ADODB.Recordset
Dim consql As String
'Conexion con Mysql
consql = "DRIVER={MySQL ODBC 3.51 Driver};" & _
"SERVER= servidor;" & _
"DATABASE=basedatos;" & _
"UID= usuario;" & _
"PASSWORD=password;" & _
"OPTION=3;"
conn.Open consql
End Function
