Conexion ala base de datos acces 2003 . Con visual

Hola amigos soy nuevo en esta materia de visual basic 6. Tengo un problema com mi conexion de base de datos acces 2003..
La conexion q tengo me funciona muy bien hasta que el dia de ayer puse una contraseña ami base de datos acces 2003. Cuando ejecuto el programa me dice que nesecito una contraseña, He Bajado varias conexiones domde benia integrado la comtraseña... Y no me funcionan.
Mi coneccion actual que tengo es esta .
Public cnn As New ADODB.Connection.
Public rst As New ADODB.Recordset.
Public sql As String.
esta son mi publicaciones amios variables.
Public Sub conectar()
Dim cadena As String
cadena = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="
If cnn.State = 1 Then cnn.Close
cnn.Open cadena & App.Path & "\sspro.mdb"
End Sub.
esta es mi conexion actual domde coloco la contraseña

Añade tu respuesta

Haz clic para o