user-defined type not defined??

[aavg]

Prueba con el siguiente código:

Public Cnn As New ADODB.Connection
Public Rst As New ADODB.Recordset


Private Sub Form_Load()

'Se abre la conexion, la instrucción app.path supone que la base esta en el mismo directorio que tu proyecto, de lo contrario sustituyela con la ruta de tu base C:\Ejemplos\Base.mdb"

Cnn.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & App.Path & "\Base.mdb"
Cnn.Open


'Se le asigna la conexion al recordset y se abre
With Rst
.ActiveConnection = Cnn
.LockType = adLockReadOnly
.CursorType = adOpenStatic
.Open "Select * from Tabla1"
End With

End Sub



Espero te sirva este ejemplo, sino con gusto trataremos de ayudarte.

Hata pronto