Supportnet / Forum / Datenbanken

Hallo beinander, habe in ein Formular zwei Buttons eingefügt, mit denen ich ein paar Eigenschaften der Datenbank ändern möchte (z.B. Datenbankfenster sichtbar etc.). Folgenden Code habe ich verwendet: Public Sub Befehl0_Click() Dim db As DAO.Database Set db = CurrentDb db.Properties("StartupShowDBWindow") = True db.Properties("StartupShowStatusBar") = True db.Properties("AllowBuiltinToolbars") = True db.Properties("AllowFullMenus") = True db.Properties("AllowSpecialKeys") = True db.Properties("AllowBreakIntoCode") = True db.Properties("AllowBypassKey") = True End Sub bzw. Public Sub Befehl1_Click() Dim db As DAO.Database Set db = CurrentDb db.Properties("StartupShowDBWindow") = False db.Properties("StartupShowStatusBar") = False db.Properties("AllowBuiltinToolbars") = False db.Properties("AllowFullMenus") = False db.Properties("AllowSpecialKeys") = False db.Properties("AllowBreakIntoCode") = False db.Properties("AllowBypassKey") = False End Sub Leider meckert Access bei den unteren beiden Eigenschaften AllowBreakIntoCode und AllowBypassKey mit Laufzeitfehler '3270' Eigenschaft nicht gefunden! Ich möchte jedoch verhindern, dass mein Code mit der Shift Taste ausgehebelt wird. Wie kann ich die beiden Eigenschaften richtig setzen? Danke vorab Harald

schau mal hier:
http://www.donkarl.com/

in der FAQ Punkt 1.8

Gruß
Teddy

• access shift reaktivieren