[VB6] Rimuovere una password da un .MDB

[b.lory]

Ciao a tutti,... vengo subito al problema ...
io ho un database access con accesso tramite password. es"pippo"
dovrei fare delle operazioni "repliche" dove ho bisogno di
rimuovere la password dal database tramite codice, una volta che ho eseguito le operazioni vorrei rimettere nuovamente la password !!!!!
Non riesco a trovare la soluzione.....
ciao

... a utilizzo ado !!! come connesione

[bluelions]

conosci VBA?
se lo conosci usa le librerie, li puoi fare tutto.
Se hai problemi fammi sapere.
Ciao

[b.lory]

Non non utilizzo VBA... se hai informazioni utili x risolvere il problema .... ben accette !!!!

[Teflo]

Devi utilizzare la dll jro.dll

Dim jro As New JRO.JetEngine()
Dim da As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=tuovecchiodatabase; Jet OLEDB:Database Password = " & oldPassword & " ; Jet OLEDB:Engine Type=5"
Dim a As String = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=tuonuovodatabase; Jet OLEDB:Database Password = " & NewPassword & " ; Jet OLEDB:Engine Type=5"
jro.CompactDatabase(da, a)