| Guten Tag!
Ich habe eine FrontEnd und eine BackEnd-Datenbank.
In der FrontEnd sind alle Abfragen, Formular, Bericht usw. projektiert.
Die BackEnd-Datenbank beinhaltet nur die Tabellen.
Jetzt habe ich programmiert, dass beim Starten der FrontEnd-DB das Makro "autoexec" die Tabellen der BackEnd-DB automatisch verknüpft:
******* CODE START *******
On Error GoTo MyError
Dim db As DAO.Database
Dim strDaten As String
Dim i as Integer
Set db = CurrentDB()
strDaten = Left(db.Name, Len(db.Name) - Len(Dir(db.Name))) & "DeineDaten.mdb"
For i = 0 To db.TableDefs.Count - 1
If db.TableDefs(i).Connect <> "" Then
If Mid(db.TableDefs(i).Connect, 11) <> strDaten Then
db.TableDefs(i).Connect = ";database=" & strDaten
db.TableDefs(i).RefreshLink
End If
End If
Next i
MyExit:
Exit Sub
MyError:
MsgBox "Bei der Installation ist eine Ausnahme aufgetreten. ", 16, "Ausnahme"
Resume MyExit
'******* CODE ENDE *******
Funktioniert soweit ganz gut.
Jedoch möchte ich die FrontEnd-DB mittels Benutzerberechtigungen gegen unerlaubten Änderungen von Abfragen, ect. schützen
ReadOnly: Benutzer darf Daten der Tabellen nur lesen, keine Abfragen ändern etc.
Write: Benutzer darf Daten der Tabellen verändern; Abfragen, Berichte, Formulare etc. einsehen aber nicht ändern
Admin: Vollzugriff
Jetzt zu meinem Problem:
Egal, mit welchem Benutzer ich mich auch anmelde, Access hüpft jedes mal in die Routine von "autoexec" und bleibt beim Verknüpfen der Tabellen stehen.
Wie kann ich das bewerkstelligen, dass diese Funktion jeder Benutzer ausführen kann?
Habe schon viel gegoogelt, konnte aber leider nix finden.
Vielen Dank für Deine/Eure Hilfe
LG
Simon |
