Tio sino agregas esa referencia no puedes utilizar ADOBD
Ve al menu proyesto/referencias/y activa Microsoft activeX data object 2.1 library
Suponiendo que tu conexion esta asi dentro de un modulo bas
Código:
Public dbConex As New Connection
Public Sub IniciarConexion()
dbConex.CursorLocation = adUseClient
dbConex.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.path & "\nombre-base-dato.mdb;Password=;Persist Security Info=false"
End Sub
De esta manera ingresas datos
Código:
Dim rst As Recordset
Private Sub cmdAgregar1_Click()
call IniciarConexion
Set rst = New Recordset
'Con esta linea abres el recordset sino te va decir que esta cerrado
rst.Open "SELECT * FROM Tabla1", dbConex, adOpenStatic, adLockOptimistic
'Insertas los datos
With rst
.AddNew
!DARPA = txtCautorization.Text
!Username = txtUsername.Text
!Contraseña = txtPass.Text
.Update
End With
End Sub
Este error sale por que no tienes activo la referencia que te digo
Error '91' en tiempo de ejecución:
Variable de tipo Object o la variable de bloque With no está establecida.