Kuinka suojata arkaluonteiset tietosi Accessin kirjautumislomakkeella

Kirjautumislomake on pakollinen tietokantoihin, jotka sisältävät arkaluontoisia tietoja. Noudata alla olevia ohjeita, jotta voit luoda oman kirjautumislomakkeen suojataksesi tietokantasi virheelliseltä käytöltä.

Lataa nyt

Jos haluat aloittaa ominaisuuden käytön mahdollisimman pian, voit:

Lataa näytetietokanta VBA-koodeilla nyt

Muussa tapauksessa voit lukea sisällön alla olevasta sisällöstä.

Kirjautumislomakkeen luomisen vaiheet Accessissa

1. Luo kirjautumistaulukko

Ensimmäinen asia, joka meidän on tehtävä, on luoda taulukko, joka tallentaa kaikki kirjautumistiedot.

1. Luo uusi taulukko ja nimeä se nimellä tbl_login.
2. Avaa taulukko suunnittelunäkymässä.
3. Lisää seuraavat kentät vastaavat tietotyypit:

4. Muokkaa salasanan syöttömaskia niin, että se näkyy sarjana tähtiä (*).

• Valitse Salasana-kenttä.
• Siirry Yleiset-välilehteen > Input Mask >…
• Kun Input Mask Wizard avautuu, valitse Salasana.
• Napsauta Valmis.

5. Avaa taulukko taulukkonäkymässä ja kirjoita ensimmäinen tietue (kirjautumistietosi).
6. Sulje taulukko ja tallenna tehdyt muutokset.

2. Luo kirjautumislomake

Luo tyhjä lomake, jossa on 2 tekstiruutua ja 2 komentopainiketta (kuten alla). Ohita komentopainikkeen ohjattu toiminto.

Aiomme viitata näihin lomakeohjaimiin koodissamme myöhemmin, joten on parasta nimetä ne uudelleen, jotta ne voidaan helposti tunnistaa:

• txt_käyttäjänimi
• txt_salasana
• cmd_login
• cmd_cancel

Muuta seuraavaksi salasanatekstilaatikon syöttömaski niin, että se näkyy myös sarjana tähtiä (*).

1. Valitse salasanatekstiruutu suunnittelunäkymässä.
2. Avaa ominaisuusarkki (ALT + Enter).
3. Valitse Tiedot-välilehti > Input Mask.
4. Valitse Salasana ja napsauta Valmis.

Seuraavaksi muutamme joitakin lomakkeen ominaisuuksia esteettisistä syistä ja ennen kaikkea varmistaaksemme, että käyttäjät eivät voi ohittaa tätä lomaketta antamatta oikeita kirjautumistietoja.

1. Valitse lomake suunnittelunäkymässä (kuten alla).
2. Avaa ominaisuustaulukko (ALT + Enter) ja päivitä seuraavat ominaisuudet:

• Alla muodostuu kieleke
  • Kuvateksti: Kirjaudu sisään
  • Levyvalitsimet: Ei
  • Navigointipainikkeet: Ei
  • Vierityspalkit: Ei kumpikaan
  • Reunuksen tyyli: Dialogi
  • Sulje-painike: Ei

• Alla Muut kieleke
  • Pop Up: Kyllä
  • Modaali: Kyllä
  • Pikavalikko: Ei

3. Tallenna lomake nimellä frm_login.

3. Lisää koodi

Lisää On Click -tapahtuma kirjautumispainikkeeseen.

1. Kun olet suunnittelunäkymässä, valitse Kirjaudu-painike.
2. Siirry kohtaan Ominaisuustaulukko > Tapahtuma-välilehti > Napsauttamalla >…
3. valita Code Builder Valitse Builder -valikosta ja napsauta OK.
4. Tämä avaa VBA-editorin.
5. Kopioi alla oleva koodi.

Private Sub cmd_login_Click()

  Dim db As DAO.Database
  Dim rst As DAO.Recordset
  Dim strSQL As String
 
  If Trim(Me.txt_username.Value & vbNullString) = vbNullString Then
    MsgBox prompt:="Username should not be left blank.", buttons:=vbInformation, title:="Username Required"
    Me.txt_username.SetFocus
    Exit Sub
  End If
 
  If Trim(Me.txt_password.Value & vbNullString) = vbNullString Then
    MsgBox prompt:="Password should not be left blank.", buttons:=vbInformation, title:="Password Required"
    Me.txt_password.SetFocus
    Exit Sub
  End If
 
  'query to check if login details are correct
  strSQL = "SELECT FirstName FROM tbl_login WHERE Username = """ & Me.txt_username.Value & """ AND Password = """ & Me.txt_password.Value & """"
 
  Set db = CurrentDb
  Set rst = db.OpenRecordset(strSQL)
  If rst.EOF Then
    MsgBox prompt:="Incorrect username/password. Try again.", buttons:=vbCritical, title:="Login Error"
    Me.txt_username.SetFocus
  Else
    MsgBox prompt:="Hello, " & rst.Fields(0).Value & ".", buttons:=vbOKOnly, title:="Login Successful"
    DoCmd.Close acForm, "frm_login", acSaveYes
  End If
 
 Set db = Nothing
 Set rst = Nothing

End Sub

Tämä koodi:

1. Tarkista, että käyttäjätunnus- ja salasanakentät eivät ole tyhjiä. Jos ne ovat, kehote tulee näkyviin.
2. Tarkista, ovatko kirjautumistiedot oikein vertaamalla niitä kirjautumistaulukon (tbl_login) arvoihin.
3. Kun kirjautumistiedot on vahvistettu, näkyviin tulee kehote, joka toivottaa käyttäjän tervetulleeksi.

Seuraava askel on lisätä koodi Peruuta-painiketta varten, jotta tietokanta sulkeutuu, kun sitä napsautetaan.

1. Lisää On Click -tapahtuma Peruuta-painikkeeseen (sama menettely kuin Kirjaudu-painikkeella).
2. Kopioi alla oleva koodi.

Private Sub cmd_cancel_Click()
   DoCmd.Quit acQuitSaveAll
End Sub

4. Aseta sisäänkirjautumislomake näyttölomakkeeksi

Aseta lopuksi kirjautumislomake oletuslomakkeeksi, jonka käyttäjät näkevät avattaessa tietokannan.

1. Siirry kohtaan Tiedosto > Asetukset > Nykyinen tietokanta.
2. Aseta näyttölomakkeeksi frm_login.
3. Valitse OK.

Sinun on suljettava tietokanta ja avattava se uudelleen nähdäksesi, miten se toimii.

Palauta käyttöoikeustietokantasi

Onnittelut! Tiedät nyt kuinka suojata arvokasta tietokantasi virheellisiltä käytöltä. Nyt annan sinulle ylimääräisen vinkin. Jos tietokantasi on jostain valitettavasta syystä vioittunut, ÄLÄ panikoi. DataNumen Inc., tietojen palautustekniikoiden asiantuntija, tarjoaa ohjelmiston, joka korjaa vioittunut Access tietokanta. Tietokantasi voidaan edelleen palauttaa.

Tekijän esittely:

Jayme Stack on tietojen palauttamisen asiantuntija DataNumen, Inc., joka on maailman johtava tietojen palautustekniikoissa, mukaan lukien sql-palautus ja Excel-palautusohjelmistotuotteet. Lisätietoja osoitteessa www.datanumen.com