Codigo Base de Datos

Estado
Cerrado para nuevas respuestas

tierra

Nuevo Miembro
Miembro
#1
Quiero Abrir Base de Datos Y me da errores, soy novato y no encuentro el problema.

Lo hago asi.

Option Explicit

Private db As Database

Private rs As Recordset

Private Sub Form_Load()

Dim db As Database

Dim rs As Recordset

Const sPathBase As String = \"C:\\Archivos de programa\\Microsoft Visual Studio\\VB98\\BIBLIO.MDB\"

\' Crear el objeto de base de datos

Set db = OpenDatabase(sPathBase)

\' Crear el recordset con la tabla que queremos manipular

Set rs = db.OpenRecordset(\"Select [Au_ID],[Author],[Year Born] FROM Authors\", dbOpenDynaset)

Que Es lo Que esta mal?

Gracias
 
Estado
Cerrado para nuevas respuestas
Arriba Pie