Een van de krachtige functies achter Microsoft Access 2007 is dat u een database kunt maken met een eigen stand - alone applicatie . Dit komt goed van pas bij de verdeling van de database om meerdere gebruikers op een server . Maak andere veiligheidsmaatregelen , zoals logon formulieren , om de bescherming van uw gegevens tegen ongeautoriseerde gebruikers te garanderen . Verder de beveiliging werkt, kunt u de toegang beperken als er drie of meer mislukte aanmeldingspogingen . Op deze manier kunnen niet-geautoriseerde gebruikers geen gebruik maken van het kraken van wachtwoorden software programma's te hacken in uw database . Instructies
1 Open uw database in Access 2007 en voeg een nieuwe tabel met de naam " tblFailedAttempts . " Deze tabel wordt het aantal logon pogingen die iemand heeft in de huidige sessie te houden . Klik op het tabblad "Create " en vervolgens "Table . " Maak de tabel in de ontwerpweergave . Geef de tabel drie velden : " AttemptID " als een " AutoNummering " data type , "login " met een " Text " data type en " attempt_time " als een " Date /Time " data type. Opslaan en sluiten van de tafel . Kopen van 2 Ga naar het login formulier dat u momenteel gebruikt en bekijk de code voor de vorm . Klik op het tabblad " Database Tools" en klik op " Visual Basic . " Dubbelklik op de naam van het formulier in de lijst van objecten in de linkerkant van de Visual Basic -editor .
3 Voeg deze code aan de Visual Basic code al aanwezig op het formulier . De code zal de " tblFailedAttempts " open tafel en zie hoe vele pogingen die de persoon reeds gemaakt . Het zal ook het aantal mislukte pogingen elke keer dat de persoon probeert om in te loggen . Ten slotte zal de code de persoon na haar derde mislukte poging uit te sluiten en sluit de database.
"Set RST1 = db.OpenRecordset ( " tblFailedAttempts " , dbOpenDynaset ) op p Met RST1
. AddNew
! [ computer_login ] = Me.txtUser_hidden
. bijwerken Einde
Met MsgBox
" U heeft een verkeerde gebruikersnaam of password . " & Chr ( 13 ) & _
" Vul de juiste gebruikersnaam en het wachtwoord of " & Chr ( 13 ) & _
" contact opnemen met de Database Administrator voor hulp . " , vbOKOnly + vbCritical , " aanmeldingsprocedure geweigerd '
' Dit telt hoe vaak een gebruiker op de verkeerde userid /password combo heeft getypt . Na drie pogingen de gebruiker is
' opgehangen aan de DB , en kan geen toegang krijgen tot hun account wordt gereset door de Admin
cnt = cnt + 1 ' incrementteller indien verkeerd wachtwoord ingevoerd
Als cnt = 3 Then' Opzetten aantal pogingen
'Display Message Box MsgBox
" Access Violation programma wordt nu afgesloten " , , " Overtreding gedetecteerd " DoCmd.OpenForm " frmPWChangeCheck "
, , , , , acHidden
' verandering frmPWChangeCheck om de naam van uw login formulier
[ Forms ] ! [ frmPWChangeCheck ] ! [ Actief ] = False DoCmd.Quit
' quit applicatie en sluit Access
End If '
4 Klik op de " opslaan" -pictogram in de Visual Basic editor om de wijzigingen in de code op te slaan en sluit de editor . Klik op "Opslaan " op de belangrijkste Access -venster op het tabblad "Home " , om de wijzigingen op te slaan in de database .
|
