Bruger betinget rettigheder

Du kan lave en tabel med alle brugere, som har fuld adgang.

Tabellen (tblBrugere) skal indeholde minimum 2 kolonner: Brugernavn og Gruppe
Brugernavn skal passe til windowslogin. Gruppe kan f.eks. være Admin, Gæst eller andet.

I et modul skriver du:
Public Brugergruppe as String
Public Bruger as String

På din opstartformular lægger du denne kode på VedIndlæsning (Form_Load):
Bruger = Environ("Username")
Brugergruppe = DLookup("Gruppe", "tblBrugere", "Brugernavn = '" & Bruger & "'")
If Brugergruppe = "" then Brugergruppe = "Gæst"


På alle formularer, som skal have individuelle rettigheder lægger du f.eks. denne kode i Form_Load:
If Brugergruppe = Gæst then
  Me!knap1.Enabled = False
  Me!knap2.Enabled = False
  Me!knap3.Enabled = False
  Me!tekstboks1.Enabled = false
  ...
  ...
Endif

Kan der godt lægge en tabel og flagre uden for relationerne?

Ja, det kan der sagtens!

Men på et senere tidspunkt, kunne du måske lægge nogle log-felter på de andre tabeller. F.eks. "ÆndretAf", således at du kan se, hvem der har rettet i posten sidst. dette felt kan så relateres til tblBrugere.

Men der er ingen problemer i at have en tabel, som ikke er relateret til de andre tabeller. Det forekommer ofte.

the method Thomas describes is a simple but quite effective way to stop users altering dat. But users can with a bit of knowledge about Access still get in and alter data if they want. I suggest that you use Access's own user/group security that way your well covered.

http://support.microsoft.com/default.aspx?scid=/support/access/content/secfaq.asp