Visual Basic - conexion

Buenas haber si podeis decirme si veis algo raro en esta conexion. vb6 hacia access2003.

Dim Cnn As ADODB.Connection
Dim Strcn As String
Set Cnn = New ADODB.Connection

'ruta contiene la direccion fisica de la base de datos.
ruta = "K:\RicardCF\Programilla\No se nombre\base de datos\bd1.mdb"

Strcn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & ruta & ";" & _
"Jet OLEDB:Database Password=" & contraseña & ";"

Cnn.Open = " & Strcn & "

Aunque no se si tengo algun error mas, el error me salta al principio.

Dim Cnn As ADODB.Connection
compile error: user-defined type no defined

¿En el proyecto tienes marcada la referencia a ADO?

Mmmm me parece que no solo tengo el codigo que presente anteriormente, la verdad no sabia que tenia que marcar en el proyecto la referencia ado y ni como se hace. Si tiene tiempo y me lo puedes explicar te lo agradeceria, buscare informacion.

Gracias, Atentamente

Nexidon

En el menú Proyecto, Referencias y marcar "Microsoft AciveX Data Objects 2.7 library", o la versión más nueva que tengas en tu equipo

Bueno, mira vas al menú Proyecto pinchas en Referencias... y en la lista de refrencias disponibles buscas "Microsoft ActiveX Data Objects 2.x Library" marcas la casilla de verificación y le das botón de Aceptar.
La x es la referencia más alta que tengas (p,e, 2.8)

Se me coló uno por medio, pero es lo mismo.

Merci Marino ahora ya me funciona gracias por ayudarme, la verdad no sabia lo de las referencias me lo mirare mejor no se que algun dia me falte alguna y no lo sepa.

Atentamente

Nexidon