04/10/2004, 05:22
|
| | | Fecha de Ingreso: septiembre-2003 Ubicación: Santo Domingo - R. Dominicana
Mensajes: 606
Antigüedad: 21 años, 5 meses Puntos: 0 | |
| Hola Amigo
Mira el siguiente Código es como tengo Formulada mi Conexión la la Base de Datos:
Set Cn = New ADODB.Connection
Set Rs = New ADODB.Recordset
Cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\BDBuyOnlineWithUs.mdb" & ";"
Rs.ActiveConnection = Cn
Rs.CursorType = adOpenKeyset
Rs.LockType = adLockOptimistic
Rs.Open "Select * From Cliente"
Ahora en que parte le agrego el Codigo tuyo ? |