Acceso a BD protegida por MSHFlexGrid
Publicado por Romssel (2 intervenciones) el 23/04/2009 01:04:40
Saludos!!!..... tengo un problema...
Tengo por ejemplo MSHFlexgrid en el formulario, donde se presentan los datos de la base de datos, el problema es de q esa base de datos la tengo protegida por contraseña, entonces cuando trato de accesar a ese formulario no me deja, me marca error debido a q no eh puesto la contraseña de dicha base de datos, y le eh buscado mucho y no se como hacerle para q me deje accesar.
Se q se le tiene q poner la instruccion donde pones la contraseña, ejemplo....
Origenbd = App.Path & "prueba.mdb"
Set DB = OpenDatabase(Origenbd, False, False, "MS ACCESS; pwd=prueba")
esta parte por ejemplo es cuando inicio el programa, q me permita accesar al mismo por medio de un usuario y una contraseña y accesa satisfactoriamente.
El caso q si pongo esto mismo en el form load donde voy a editar el MSHFlexgrid, no me lo permite, me marca el error en el módulo y me dice:
"NO ES UNA CONTRASEÑA VALIDA"
Incluso en ese modulo es donde tengo lo siguiente....
With cnn
.CursorLocation = adUseClient
.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
App.Path & "prueba.mdb" & ";Persist Security Info=False"
End With
y es ahi en el modulo donde me marca el error entonces q instruccion le tengo q poner para poder accesar a la base de datos automaticamente cuando le pongo la contraseña cuando inicio el programa????
Espero me puedan ayudar......... de todos modos para cualquier aclaracion sobre mi duda, mi correo es [email protected].
Gracias!!!
Tengo por ejemplo MSHFlexgrid en el formulario, donde se presentan los datos de la base de datos, el problema es de q esa base de datos la tengo protegida por contraseña, entonces cuando trato de accesar a ese formulario no me deja, me marca error debido a q no eh puesto la contraseña de dicha base de datos, y le eh buscado mucho y no se como hacerle para q me deje accesar.
Se q se le tiene q poner la instruccion donde pones la contraseña, ejemplo....
Origenbd = App.Path & "prueba.mdb"
Set DB = OpenDatabase(Origenbd, False, False, "MS ACCESS; pwd=prueba")
esta parte por ejemplo es cuando inicio el programa, q me permita accesar al mismo por medio de un usuario y una contraseña y accesa satisfactoriamente.
El caso q si pongo esto mismo en el form load donde voy a editar el MSHFlexgrid, no me lo permite, me marca el error en el módulo y me dice:
"NO ES UNA CONTRASEÑA VALIDA"
Incluso en ese modulo es donde tengo lo siguiente....
With cnn
.CursorLocation = adUseClient
.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
App.Path & "prueba.mdb" & ";Persist Security Info=False"
End With
y es ahi en el modulo donde me marca el error entonces q instruccion le tengo q poner para poder accesar a la base de datos automaticamente cuando le pongo la contraseña cuando inicio el programa????
Espero me puedan ayudar......... de todos modos para cualquier aclaracion sobre mi duda, mi correo es [email protected].
Gracias!!!
Valora esta pregunta
0