Otros datos:
1.- Es Sql Server 2008
2.- Tengo visual basic 6.0
3.- La base de datos es Local y no necesita contraseña
4.- Dejo este pequeño ejemplo pero no logro conectarme
Código:
Ayuda por favor With cnn
.CursorLocation = adUseClient
.Open "Provider=SQLNCLI10;Server=SIS;Database=" & _
"Pl;" & "Uid=;Pwd="
End With

