Bonjour,
J'applique le code suivant pour compacter ma bd protégée par un password :
Ca fonctionne nikel, sauf que la base compactée (MyDb_Temp.mdb) est accessible sans password !!!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 SProvider := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='; m_FileSrc :=m_path+'MyDb.mdb'; m_FileDest :=m_path+'MyDb_Temp.mdb'; BD_Password := MyDb.Params.Values['PASSWORD']; DbSrc:=SProvider+m_FileSrc+';Jet OLEDB:Database Password='+BD_Password; DbDest:=SProvider+m_FileDest+';' JetEngine.CompactDatabase(m_DbSrc,m_DbDest);
Et évidement, je souhaiterais qu'elle reste protégée...
Alors, que me manque-t-il ?
Merci.[/b]
Partager