Ver Mensaje Individual
  #2 (permalink)  
Antiguo 09/07/2004, 09:52
Avatar de EL_MVM
EL_MVM
 
Fecha de Ingreso: julio-2004
Mensajes: 24
Antigüedad: 19 años, 10 meses
Puntos: 0
A ver si te sirve esto:

Dim Cn As New ADODB.Connection
Dim strCn As String
strCn = "Provider=Microsoft.Jet.OLEDB.3.51;" & _
"Data Source=nwind.MDB;" & _
"Jet OLEDB:System database=c:\winnt\system32\System.MDW"

Cn.Open ConnectionString:=strCn, _
UserID:="Admin", Password:="ambsoftware"