{"id":1610,"date":"2013-09-04T17:33:04","date_gmt":"2013-09-04T15:33:04","guid":{"rendered":"http:\/\/www.ramses.de\/?p=1610"},"modified":"2013-09-04T17:33:25","modified_gmt":"2013-09-04T15:33:25","slug":"faq-access-access-gegen-unbefugten-zugriff-schutzen","status":"publish","type":"post","link":"https:\/\/www.ramses.de\/?p=1610","title":{"rendered":"FAQ Access – Access gegen unbefugten Zugriff sch\u00fctzen"},"content":{"rendered":"
\n

Access Formulare – Access gegen unbefugten Zugriff sch\u00fctzen<\/h1>\n<\/div>\n

Problem :<\/h2>\n

Sicherlich kennen Sie die Situation: Sie arbeiten in Access an sensiblen Daten und wollen nun einmal kurzzeitig den Arbeitsplatz verlassen. Damit Unbefugte die sensiblen Daten w\u00e4hrend Ihrer Abwesenheit nicht einsehen k\u00f6nnen, ist es erforderlich, dass Sie zun\u00e4chst alle Formulare schlie\u00dfen und Access beenden. Nach Ihrer R\u00fcckkehr m\u00fcssen Sie dann Access starten und gegebenenfalls mehrere Formulare \u00f6ffnen, bevor Sie endlich weiterarbeiten k\u00f6nnen. In diesem Tipp stellen wir Ihnen eine L\u00f6sung vor, mit der Sie Access per Mausklick deaktivieren und erst nach Eingabe des richtigen Kennworts wieder aktivieren k\u00f6nnen.<\/p>\n

Probleml\u00f6sung:<\/h2>\n

Das Konzept der L\u00f6sung ist recht einfach: Das Access-Fenster wird minimiert in der Taskleiste von Windows abgelegt und dann ein modaler (gebundener) Eingabedialog in Form von „InputBox$()“ angezeigt. Solange dieser Dialog angezeigt wird, kann Access nicht \u00fcber das Symbol in der Taskleiste aktiviert werden. Die Eingabe des korrekten Kennwortes f\u00fchrt dazu, dass das Access-Fenster wieder in der urspr\u00fcnglichen Form angezeigt wird und Sie somit sofort weiterarbeiten k\u00f6nnen.<\/p>\n

Um diese L\u00f6sung in Ihre Datenbank einzubauen, gehen Sie wie folgt vor:
\nGeben Sie in einem neuen oder in einem vorhandenen Modul die folgende Funktion ein:<\/p>\n

Public Function LockAccess()\r\nDim strKennwort As String\r\nConst cstrKennwort = \"geheim\"\r\nDoCmd.RunCommand acCmdAppMinimize\r\nWhile strKennwort <> cstrKennwort\r\nBeep\r\nstrKennwort = InputBox$(\"Kennwort f\u00fcr die \" _\r\n& \"Reaktivierung von Access:\", \"Kennworteingabe:\", \"\")\r\nDoEvents\r\nWend\r\nDoCmd.RunCommand acCmdAppRestore\r\nEnd Function\r\n\r\n<\/pre>\n
Diese Funktion legt das Access-Fenster zun\u00e4chst minimiert in der Taskleiste von Windows ab. Anschlie\u00dfend wird in einer „While-Wend“-Schleife solange „InputBox$()“ ausgef\u00fchrt, bis das eingegebene Kennwort mit der Konstanten „cstrKennwort“ \u00fcbereinstimmt. \u00c4ndern Sie diese Konstante gegebenenfalls auf das gew\u00fcnschte Kennwort.<\/p>\n
Speichern Sie die \u00c4nderungen und verlassen Sie die VBA-Entwicklungsumgebung dann wieder.<\/p>\n
Zur\u00fcck in Access w\u00e4hlen Sie das Men\u00fc Extras-Start an und klicken auf die Schaltfl\u00e4che Weitere. Deaktivieren Sie hier die Option Access-Spezialtasten verwenden und klicken Sie auf Ok. Diese Einstellung ist notwendig, damit die Kennwortabfrage nicht \u00fcber die Tastenkombination Strg+Untbr abgebrochen werden kann.<\/p>\n
Wenn Sie Access 2000, 2002\/XP oder 2003 einsetzen, w\u00e4hlen Sie das Men\u00fc Extras-Optionen an, wechseln Sie auf die Registerkarte „Ansicht“, deaktivieren Sie die Option Fenster in Taskleiste und \u00fcbernehmen Sie die \u00c4nderungen mit Ok. Diese Einstellung ist notwendig, weil sonst einzelne „Unterfenster“ von Access wie beispielsweise ein Formular mit Personaldaten einfach durch Klick in die Taskleiste aktiviert werden k\u00f6nnte.<\/p>\n
Lassen Sie nun zun\u00e4chst nur das Datenbankfenster anzeigen und legen Sie hier wie folgt ein Symbol f\u00fcr den Aufruf des Kennwortschutzes an:<\/p>\n
Klicken Sie mit der rechten Maustaste auf das Men\u00fc und w\u00e4hlen Sie das Kontextmen\u00fc Anpassen an.<\/p>\n
Wechseln Sie auf die Registerkarte „Befehle“, markieren Sie die Kategorie „Datei“ und ziehen Sie den Eintrag „Benutzerdefiniert“ aus der Liste Befehle an die gew\u00fcnschte Position in der Symbolleiste.<\/p>\n
Klicken Sie mit der rechten Maustaste auf das neue Symbol und nehmen Sie hier die folgenden Einstellungen im Eigenschaftenfenster vor:
\nSchaltfl\u00e4chensymbol \u00e4ndern -> Schl\u00fcssel
\nOption Standard aktivieren<\/p>\n
Klicken Sie nochmals mit der rechten Maustaste auf das neue Symbol und w\u00e4hlen Sie das Kontextmen\u00fc Eigenschaften an.
\nIm nachfolgenden Dialog geben Sie f\u00fcr die Einstellung „Bei Aktion“ die folgende Formel ein:<\/p>\n
=LockAccess()<\/p>\n
Klicken Sie zweimal auf Schlie\u00dfen, um die Anpassungen zu \u00fcbernehmen.
\nBeenden Sie Access und starten Sie es neu, damit die ge\u00e4nderten Einstellungen wirksam werden.<\/p>\n
Wenn Sie nun in der Symbolleiste auf das eben angelegte Symbol klicken, wird Access minimiert in der Taskleiste abgelegt und die Kennworteingabe angezeigt. Erst nach Eingabe des richtigen Kennwortes kann nun wieder mit Access gearbeitet werden.<\/p>\n
M\u00f6chten Sie den Schutz auch zum Beispiel in der Formular- oder Datenblattansicht per Mausklick aktivieren k\u00f6nnen, schalten Sie zun\u00e4chst in die gew\u00fcnschte Ansicht beziehungsweise in den gew\u00fcnschten Modus, um die entsprechende Symbolleiste anzuzeigen. Dort f\u00fcgen Sie dann, wie oben f\u00fcr das Datenbankfenster erl\u00e4utert, ein Symbol f\u00fcr die Aktivierung des Schutzes hinzu.
\nBitte beachten Sie, dass dieser Schutz nicht absolut sicher ist – wer sich auf anderem Wege Zugang zu Ihrem Access verschaffen und Module einsehen kann, wird das Kennwort ausspionieren oder gar \u00e4ndern k\u00f6nnen. „Gelegenheitsschn\u00fcffler“ h\u00e4lt der Schutz aber F\u00e4lle wirksam ab.<\/p>\n","protected":false},"excerpt":{"rendered":"
Access Formulare – Access gegen unbefugten Zugriff sch\u00fctzen Problem : Sicherlich kennen Sie die Situation: Sie arbeiten in Access an sensiblen Daten und wollen nun … Weiterlesen …<\/a><\/p>\n","protected":false},"author":1,"featured_media":0,"comment_status":"open","ping_status":"closed","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[47,43],"tags":[58,79],"class_list":["post-1610","post","type-post","status-publish","format-standard","hentry","category-access","category-faq","tag-access-2010","tag-netzwerkmehrbenutzerumgebung"],"_links":{"self":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts\/1610","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/types\/post"}],"author":[{"embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/users\/1"}],"replies":[{"embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcomments&post=1610"}],"version-history":[{"count":3,"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts\/1610\/revisions"}],"predecessor-version":[{"id":1612,"href":"https:\/\/www.ramses.de\/index.php?rest_route=\/wp\/v2\/posts\/1610\/revisions\/1612"}],"wp:attachment":[{"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Fmedia&parent=1610"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Fcategories&post=1610"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/www.ramses.de\/index.php?rest_route=%2Fwp%2Fv2%2Ftags&post=1610"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}