
09/07/2004, 09:52
|
 | | | Fecha de Ingreso: julio-2004
Mensajes: 24
Antigüedad: 20 años, 8 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" |