Kennwortgeschützte Datenbank per VBA öffnen

Jürgen Volke

unread,

Dec 3, 2002, 11:22:49 AM12/3/02

to

Hallo Andreas

********************************************
ich möchte eine kennwortgeschützte Access-Datei (Access97)
per VBA öffnen. Der folgende Befehl funktioniert nicht,
genau genommen produziert er die Fehlermeldung:
Laufzeitfehler 3031 - kein zulässiges Kennwort
--------------------------------
Set dbsneu = wsp.OpenDatabase("DB1.mdb", , , "PWD=xyz")
--------------------------------
Der Name der Datei ist 'natürlich' korrekt eingegeben, das
Kennwort lautet: 'xyz'
Wer kann mir helfen, das Syntaxproblem - etwas anderes
kann das an dieser Stelle kaum sein - zu lösen?
***********************************************

probier mal:

Set dbsneu = wsp.OpenDatabase("DB1.mdb",False ,False , ";PWD=xyz")

HTH Jürgen

Bernhard Martin

unread,

Dec 3, 2002, 11:24:27 AM12/3/02

to

Hallo Andreas ,

>-----Originalnachricht-----
>Liebe Access Spezialisten,

>
>ich möchte eine kennwortgeschützte Access-Datei
(Access97)
>per VBA öffnen. Der folgende Befehl funktioniert nicht,
>genau genommen produziert er die Fehlermeldung:
>Laufzeitfehler 3031 - kein zulässiges Kennwort
>--------------------------------
>Set dbsneu = wsp.OpenDatabase("DB1.mdb", , , "PWD=xyz")
>--------------------------------
>Der Name der Datei ist 'natürlich' korrekt eingegeben,
das
>Kennwort lautet: 'xyz'
>Wer kann mir helfen, das Syntaxproblem - etwas anderes
>kann das an dieser Stelle kaum sein - zu lösen?
>

>Vielen Dank.
>Mit freundlichen Grüßen
>Andreas Gastreich
>
>.
>

hast Du schon mal dies probiert ?
Set dbsneu = wsp.OpenDatabase("DB1.mdb", , , "PW=xyz")

--
HTH Bernhard
www.unofactura.de

Gunter Avenius

unread,

Dec 3, 2002, 12:30:01 PM12/3/02

to

Hallo Andreas,

Andreas Gastreich schrieb folgendes:

> ich möchte eine kennwortgeschützte Access-Datei (Access97)
> per VBA öffnen. Der folgende Befehl funktioniert nicht,
> genau genommen produziert er die Fehlermeldung:
> Laufzeitfehler 3031 - kein zulässiges Kennwort
> --------------------------------
> Set dbsneu = wsp.OpenDatabase("DB1.mdb", , , "PWD=xyz")
> --------------------------------
> Der Name der Datei ist 'natürlich' korrekt eingegeben, das
> Kennwort lautet: 'xyz'
> Wer kann mir helfen, das Syntaxproblem - etwas anderes
> kann das an dieser Stelle kaum sein - zu lösen?

Access-FAQ Punktr 6.19 (Datenbank-Kennwort übergeben)

--
Gruß
Gunter
_________________________________________________
Access FAQ: http://www.donkarl.com
home: http://www.avenius.com

Rafael Kupfer

unread,

Dec 3, 2002, 7:27:20 PM12/3/02

to

Hallo Andreas,
"Andreas Gastreich" <andreas....@rockwool.de> schrieb:

>ich möchte eine kennwortgeschützte Access-Datei (Access97)
>per VBA öffnen. Der folgende Befehl funktioniert nicht,
>genau genommen produziert er die Fehlermeldung:
>Laufzeitfehler 3031 - kein zulässiges Kennwort
--------------------------------
>Set dbsneu = wsp.OpenDatabase("DB1.mdb", , , "PWD=xyz")

Es ist zwar eher unwahrscheinlich, aber stimmt dein Passwort mit Groß/Kleinschreibung?
(hab dadurch mal eine Stunde an mir selbst gezweifelt ;-)

Gruß
Rafael