Some cleverdick has password protected a database I had on disk, so I thought I could change the pwd so that I would at least be able to open it.
Trouble is I have an error in one line and I can't cure it.
Code as follows
The problem is with... = "", "tg"Code:Private Sub Form_Load() Dim db As Database Set db = OpenDatabase("A:\arc99.mdb", True) db.NewPassword = "", "tg" db.Close End Sub
Keep getting "Expected end of statement" at comma, no matter what I do
Help appreciated
GRAHAM




Reply With Quote