User anlegen

23/09/2009 - 14:53 von George Löwer | Report spam
Hi ihr,

wenn ich per ADOX in meiner Datenbank einen Benutzer anlegen möchte, kommt
folgende Fehlermeldung.
Laufzeitfehler: 3251
Das Objekt oder der Provider kann den angeforderten Vorgang nicht ausführen.

Database.connectionstring="Microsoft.Jet.OLEDB.4.0;Data
Source=Datenbank.mdb;Persist Security Info=False;Jet OLEDB:Database
Password=kennwort;"
Database.open

Sub Neuer_Benutzer
Dim CAT As ADOX.Catalog
Dim USR As ADOX.user
Set CAT = New ADOX.Catalog
Set CAT.ActiveConnection = Database
Set USR = New ADOX.user
USR.Name = "TEST"
'Hier tritt der Fehler auf
CAT.Users.Append USR
end sub

Wenn ich das ganze im Access direkt mache klappt es ohne Probleme.
Vielleicht kann mir ja jemand helfen.


Gruß George Löwer
 

Lesen sie die antworten

#1 Peter Götz
24/09/2009 - 11:49 | Warnen spam
Hallo George,

wenn ich per ADOX in meiner Datenbank einen Benutzer
anlegen möchte, kommt folgende Fehlermeldung.
Laufzeitfehler: 3251
Das Objekt oder der Provider kann den angeforderten
Vorgang nicht ausführen.

Database.connectionstring> "Microsoft.Jet.OLEDB.4.0;
Data Source=Datenbank.mdb;
Persist Security Info=False;
Jet OLEDB:Database Password=kennwort;"
Database.open



Persist Security ist für eine Jet-DB überflüssig, da
immer False.

Sub Neuer_Benutzer
Dim CAT As ADOX.Catalog
Dim USR As ADOX.user
Set CAT = New ADOX.Catalog
Set CAT.ActiveConnection = Database
Set USR = New ADOX.user
USR.Name = "TEST"
'Hier tritt der Fehler auf
CAT.Users.Append USR
end sub



Dein Connectionobjekt enthàlt keinen Hinweis
auf die zu Deiner *.mdb gehörende System.mdw,
in welcher der neue Benutzer eingetragen werden
könnte.


Wenn ich das ganze im Access direkt mache klappt
es ohne Probleme.



Deine Access.mdb ist in diesem Fall sicher mit einer
entsprechenden System.mdw verbunden.

Gruß aus St.Georgen
Peter Götz
www.gssg.de (mit VB-Tipps u. Beispielprogrammen)

Ähnliche fragen