Necesito acceder a una tabla de una base de datos accdb desde un proyecto adp.

en el proyecto de adp tengo un formulario que quiero que me tome los registros de la tabla del proyecto de accdb. En la tabla en concreto tiene un tipo de datos : Datos adjuntos.

Según el código que he puesto, no me reconoce estos datos.

Adjunto código.

Private Sub Form_Open(Cancel As Integer)
Dim OldWs As Workspace
Dim OldDb As Database
'Dim RcSet As New ADODB.Recordset
Dim RcSet As Recordset
Dim sql As String
sql = "select * from tabla1"
Dim tablaX As String
tablaX = "C:\jab\descargas\jab\access\Bases de datos\abrir_recordset_desde_otro_proyectoSub.accdb"
Set OldWs = DBEngine.Workspaces(0)
Set OldDb = OldWs.OpenDatabase(tablaX, , True)
'Set OldDb = OldWs.OpenDatabase(DIR_1_TABLA1, False, False, ";PWD=jab")
'RcSet.Open sql, CurrentProject.Connection, adOpenForwardOnly, adLockReadOnly
Set RcSet = OldDb.OpenRecordset(sql) ', dbOpenTable)
RcSet.MoveLast
por = RcSet.RecordCount
MsgBopor por
Set Forms("Tabla1").Recordset = RcSet
End Sub

El hecho es que creo que lo tengo que realizar con 12.0 data engine pero no se usarlo.

A ver si me echa una mano alguien.

Gracias.

Añade tu respuesta

Haz clic para o