conexion a sql con adodc

Leonel Palomares
06 de Agosto del 2005
como puedo generar una conexion a un servidor SQL mediandte un adodc en visual basic para poderla conectar a una base de datos

pepeviche
06 de Agosto del 2005
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