Come impedire un accesso utente al 2007 Database di Microsoft Access dopo tre tentativi

May 19

Come impedire un accesso utente al 2007 Database di Microsoft Access dopo tre tentativi


Una delle caratteristiche più potenti dietro Microsoft Access 2007 è che si può fare una banca dati propria applicazione stand-alone. Questo è utile quando distribuire il database a più utenti su un server. Fare altre misure di sicurezza, come ad esempio le forme di accesso, per garantire la protezione dei dati da utenti non autorizzati. Per promuovere l'alimentazione di sicurezza, è possibile limitare l'accesso se ci sono tre o più tentativi di accesso non riusciti. In questo modo, gli utenti non autorizzati non può usare programmi software password-cracking di incidere nel database.

istruzione

1 Aprire il database in Access 2007 e aggiungere una nuova tabella denominata "tblFailedAttempts." Questa tabella conterrà il numero di tentativi di accesso che qualcuno ha nella sessione corrente. Fare clic sulla scheda "Crea" e poi "Tabella". Creare la tabella in visualizzazione struttura. Dare il tavolo tre campi: "AttemptID" come un tipo di dati "Contatore", "login" con un tipo di dati "Testo" e "attempt_time" come tipo di dati "Data / ora". Salvare e chiudere la tabella.

2 Vai al form di login che si sta utilizzando e visualizzare il codice per il modulo. Fare clic sulla scheda "Database Strumenti" e quindi fare clic su "Visual Basic". Fare doppio clic sul nome per il modulo nella lista degli oggetti nella parte sinistra dell'editor di Visual Basic.

3 Aggiungere questo codice al codice Visual Basic già presente sul modulo. Il codice si aprirà la tabella "tblFailedAttempts" e vedere come molti tentativi che la persona ha già fatto. Sarà anche aumentare il numero di tentativi falliti ogni volta che la persona che cerca di effettuare il login. Infine, il codice si blocca la persona fuori e chiudere il database dopo il suo terzo tentativo fallito.

"Set RST1 = db.OpenRecordset (" tblFailedAttempts ", dbOpenDynaset)

With rst1

.Aggiungere nuova

! [Computer_login] = Me.txtUser_hidden

.Aggiornare

End With

MsgBox "È entrato nella sbagliato nome utente o password." & Chr (13) & _

"Si prega di inserire il corretto nome utente e password o" & Chr (13) & _

"Contattare l'amministratore di un database per l'assistenza.", VbOKOnly + vbCritical, "Accesso negato"

'Questo conta quante volte un utente ha digitato nel torto combo UserID / Password. Dopo tre tentativi l'utente è

'Sospesa dal DB, e non può avere accesso fino a quando il loro account viene resettato dal Admin

cnt = cnt + 1 'incremento del contatore se una password errata immesso

Se cnt = 3 Then 'determinato numero di tentativi

'Visualizza Message Box

MsgBox "Programma violazione di accesso verrà chiuso", "violazione rilevata"

DoCmd.OpenForm "frmPWChangeCheck",,,,, acHidden

'Cambiare frmPWChangeCheck al nome del modulo di login

[Forms]! [FrmPWChangeCheck]! [Attivo] = false

DoCmd.Quit 'chiudere l'applicazione e chiudere Access

Finisci se"

4 Fare clic sull'icona "Salva" nell'editor di Visual Basic per salvare le modifiche al codice e quindi chiudere l'editor. Fare clic su "Salva" nella finestra di accesso principale, nella scheda "Home", per salvare le modifiche al database.