Access Datenbank und Passwort Problem!

[bweiss]

Hallo!

Ich habe folgenden Quellcode:

Set passdb = DBEngine.OpenDatabase(salondatenbank, True, False)

passdb.NewPassword "", "geheim"

passdb.Close

Ich möchte bei einer Datenbank ohne Passwort ein Passwort über VB setzen.

Ich bekomme jedoch jedesmal den Laufzeitfehler 3031 - kein zulässiges Kennwort!

Habt ihr ne Lösung?

Danke!

[Gast]

Klick mich.

Error 3031 bedeutet das die Datenbank passwortgeschützt ist.