Visual Basic - ayuda con conexion porfavor...

hola. estoy trabajando con VB6 y una base de datos Mysql, el problema es que cuando intento conectarme por medio de VB me da este error..

error de compilacion: no se ha definido el tipo definido por el usuario.
el codigo es este:

-----------------------------------------------------------------------------------
Public CONN As ADODB.Connection 'el error lo marca aqui
Public rs As ADODB.Recordset

Function CONEX()
Set CONN = Nothing
Set CONN = New ADODB.Connection
Set rs = New ADODB.Recordset
rs.CursorLocation = adUseServer
CONN.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _
& "SERVER=olaya;" _
& "DATABASE=agenda;" _
& "UID=root;" _
& "PWD=;" _
& "OPTION=3"
CONN.CursorLocation = adUseClient
CONN.Open
End Function

esta funcio la estoy haciendo en un modulo (modulo1.bas)
he hecho otras pruebas anteriolmente pero no me da ningun error pero no se quepasa ahora..

uso winxp sp2, VB6, mysql 4.1.....

¿has comprobado las referencias?
por el código y el punto donde indicas que se produce el error podría ser que la referencia a ADODB no este debidamente cargada.

Para cargar la Referencia de ADO, tenés que ir al Menú Proyectos -> Referencias y buscar "Microsoft ActiveX Data Object 2.x Library"
La más actualizada se supone es mejor.

perfecto,,,gracias