referencia a una tabla desde un informe
Publicado por Luis (74 intervenciones) el 23/04/2003 19:27:08
Buenas tardes, me ocurre que estoy haciendo un programita con access, y tengo que crear registros en una tabla tomando datos de otra haciendoles unos cálculos, todo ello al pulsar un botón en un formulario que no está vinculado a ninguna tabla.
Estoy intentándolo a través de recordset con el generador de códigos, pero no se como conectar un campo (rst adodb.recordset) a la tabla y poder asà hacer referencia a uno de sus campos, lo intento como si lo hiciera desde visual basic (es por el camino que más he avanzado), pero me da problemas con el provider, o sea, ejemplo:
Set cn = New ADODB.Connection
cn.Provider = "Microsoft.Jet.OLEDB.3.51"
cn.ConnectionString = "c:\db1.mdb"
cn.CursorLocation = adUseClient
cn.Open ==> En esta instrucción me dá el error: "No se encontró el proveedor especificado. Es posible que no esté instalado correctamente (lÃnea 2 del ejemplo)"
Set rst = New ADODB.Recordset
rst.CursorType = adOpenDynamic
rst.LockType = adLockOptimistic
rst.Source = "Select * from table1"
Set rst.ActiveConnection = cn
rst.Open
Si fuese problema de Microsoft Jet ¿donde puedo encontrar la versión 3.51 (Access 97)?
Si no ¿cuál es y cómo lo soluciono?
GRACIAS.
Estoy intentándolo a través de recordset con el generador de códigos, pero no se como conectar un campo (rst adodb.recordset) a la tabla y poder asà hacer referencia a uno de sus campos, lo intento como si lo hiciera desde visual basic (es por el camino que más he avanzado), pero me da problemas con el provider, o sea, ejemplo:
Set cn = New ADODB.Connection
cn.Provider = "Microsoft.Jet.OLEDB.3.51"
cn.ConnectionString = "c:\db1.mdb"
cn.CursorLocation = adUseClient
cn.Open ==> En esta instrucción me dá el error: "No se encontró el proveedor especificado. Es posible que no esté instalado correctamente (lÃnea 2 del ejemplo)"
Set rst = New ADODB.Recordset
rst.CursorType = adOpenDynamic
rst.LockType = adLockOptimistic
rst.Source = "Select * from table1"
Set rst.ActiveConnection = cn
rst.Open
Si fuese problema de Microsoft Jet ¿donde puedo encontrar la versión 3.51 (Access 97)?
Si no ¿cuál es y cómo lo soluciono?
GRACIAS.
Valora esta pregunta


0