Nachete
15 de Mayo del 2004

Necesito desde un modulo VBA en ACCESS poder introducir información en una Tabla de la misma Base de Datos que genera dicho modulo. ¿Alguien me puede ayudar? No se como hacer referencia a la Tabla. GRACIAS

Henry
15 de Mayo del 2004

Ese error es que estas usando una base de datos de acess de access de 2002 o posterior. Para eliminar este error tienes que inculuir la referencia Microsoft access 10.0 Object library. y con ese ya tendia que funcionar

visillac
15 de Mayo del 2004

No se si entendi bien tu pregunta, proba con el siguiente codigo.

Option Compare Database
Option Explicit

Dim db As Database
Dim rs1 As Recordset

Function Introducir() As Boolean
On Error GoTo Err_Introducir
Set db = CurrentDb
Set rs1 = db.OpenRecordset("SELECT * FROM Tabla")
rs1.AddNew
rs1!Nombre = "Alejandro"
rs1!Apellidos = "Visillac"
rs1.Update
Introducir = True
Exit Function
Err_Introducir:
MsgBox Err.Description & " # " & Err.Number
Introducir = False
End Function

Nachete
15 de Mayo del 2004

Me dice en "Dim db As Database
" que "No se ha definido el tipo definido por el usuario".
¿Que tengo aue hacer antes?

Gracias de antemano.

David
15 de Mayo del 2004

Eso es porque estas usando un access 2002 en el 97 funciona en el 2002 debes cargar el modulo de DAO ya que no lo lleva cargado de antemano.

Salu2

Nachete
15 de Mayo del 2004

Me dice en "Dim db As Database
" que "No se ha definido el tipo definido por el usuario".
¿Que tengo que hacer antes?

Gracias de antemano.

Nachete
15 de Mayo del 2004

Me dice en "Dim db As Database
" que "No se ha definido el tipo definido por el usuario".
¿Que tengo aue hacer antes?

Gracias de antemano.

visillac
15 de Mayo del 2004

Me falto decirte que (Nombre y Apellidos) son los nombres de los campos de la tabla
si ejecutas la funcion introducir paso a paso con F8 vas a ver que agrega un nuevo registro a tu tabla

Nachete
15 de Mayo del 2004

Muchisimas gracias. Lo probaré.-