Sikkerhedsindstillinger til databasevinduet

Først så laver du lige følgende kode:

Function F11button()

If CurrentUserInGroup("GruppeNavn") Then    'HUSK at ændre til dit gruppenavn!
    DoCmd.SelectObject acTable, , True
Else
    MsgBox "Nice try!", vbExclamation + vbOKOnly, "Fejl!"
End If

End Function


Function CurrentUserInGroup(GName As String) As Integer
Dim w As Workspace, U As User, i As Integer
 
CurrentUserInGroup = False
Set w = DBEngine.CreateWorkspace("", "admin", "")
Set U = w.Users(CurrentUser())
For i = 0 To U.Groups.Count - 1
    If U.Groups(i).Name = GName Then
        CurrentUserInGroup = True
        Exit Function
    End If
Next i
   
End Function

Herefter laver du så en makro, der fanger F11-tasten. Det gør du ved at lave en makro som gemmes under navnet "AutoKeys". Inde i makroen laver du en makro med makronavn {F11} (inkl. parenteserne!) og under Handling vælger du AfspilKode og under Funktionsnavn skriver du så F11button().

På denne måde kan kun autoriserede brugere aktivere F11 tasten til at åbne databasevinduet.

Sjap og Rudy->Hvordan forhindrer I at man holder Shift-tasten nede under opstart og derved forhindre databasen i at starte op? Og hvordan forhindre I at brugeren går i menuen Vindue->vis->database vindue?

Jeg har selv skrevet en lille artikel/vejledning til hvordan man sikre sig mod at folk får adgang 'bag om systemet'. Den ligger nederst på denne side:
http://www.makeiteasy.dk/eksempler/VBFunktioner.htm

Den er ikke 100% sikker, da der stadig er et par huller (f.eks. kan man stadig lave en ny database og importere alle objekter. Dette kan delvist løses vha sikkerhed og ved at konveretere databasen til en .mde-fil.

thomasjepsen
Jeg har ikke taget højde for shift-tasten. Alderen får mig åbenbart til at glemme de indlysende muligheder :0(
Men som du siger, så kan det ikke rigtigt gøres helt sikkert i Access - men jeg tror også bare, at pointen er at gøre det så svært så (de fleste) folk holder sig væk. En "haj" vil langt hen ad vejen kunne snige sig udenom.

Jeg siger nu ikke, at Access ikke sikker - En SQL- eller Oracle server er jo heller ikke 100% sikker)
Jeg mente bare, at den vejledning, jeg havde lagt på min egen hjemmeside ikke var helt nok til at sikre den 100%

Når alle huller er lukket i Access, er den så sikker som nogen anden database (nogle vil sikkert sige mig imod, men så hører jeg gerne argumenterne ;o)

Problemet er netop bare, at man skal huske ALLE hullerne - og i vores alder (uden at kende din) så kniber det bare med at huske hvor gammel man selv er :o(

Jeg var lige ved at skrive at min alder er fircifret, men det var ikke hlet hvad jeg mente. Alderen begynder med et firtal (så må i selv gætte om der er et tal bagefter eller ej).

Access' sikkerhed skal jeg ikke gøre mig klog på. De får gange jeg har haft brug for det, har jeg lavet en MDE-fil - og så håbet på at det var tilstrækkeligt.

Orv, er du SÅ gammel??? Og du kan alligevel finde ud af at bruge en PC (eller kalder du den stadig en datamat?) haha :o)

Ja, så er du 4-13 år ældre end mig (så burde du selv kunne regne min alder ud ;)

=;0)  Det må så blive i det "lette" ende, for forskellen er så 110 år (brugte lig fem minutter på at regne det ud binært!).

Ja, der findes jo kun 10 slags folk:
Dem som forstår binære tal, og dem som ikke gør ;~}

:0))

Undskyld, jeg havde glemt at respondere på disse svar.

Jeg har ikke prøvet det af endnu, men stoler på, at det virker. Derfor disse point.

Og Thomas, du får også point - mest på grund af din unge alder ;-)

Jeg er selv ikke nogen årsunge, runder et halvt århundrede næste gang.

Hej Eksperter !
Nu føler jeg mig pludselig ikke så gammel alligevel (jeg er vel på sjaps alder) Sidder og skal afslutte mit db-projekt - meget interessant læsning her - blandt hajer og binæret fungerende hjerner.