שלום לכולם,

בניתי מסד נתונים באקסס, ואני מעוניין ליצור טופס כניסה LOGIN לטפסים השונים שיצרתי.
יצרתי לכל משתמש, שם וסיסמא בטבלת "משתמשים", והמטרה היא שלאחר שיזין אותם בטופס הכניסה, בתווית לשם ותווית לסיסמא, יעבור בדיקת אימות בהתאם לטבלת "משתמשים".

מה האירוע שעליי להזין על הפקד "כניסה" שבטופס הכניסה ?
אני משתמש באקסס 2007.

תודה מראש לכל העונים.

חגי.

להלן דוגמא לטופס כניסה פשוט באקסס . 3 פקדים תיבת טקסט 1 ששמה txtUser עו אחת ששמה txtPass
כפתור ששמו cmdLogin


הפקודה שמאחורי הכפתור (באירוע לחיצה on click event )

[LEFT]

קוד:

Private Sub cmdLogin_Click()

Dim sql As String, rst As DAO.Recordset

sql = "SELECT Count(lngEmpID) AS User"
sql = sql & " FROM tblEmployees"
sql = sql & " WHERE strEmpName='" & txtUser.Value & "' AND strEmpPassword='" & txtPass.Value & "';"
Set rst = CurrentDb.OpenRecordset(sql)

If (rst(0)) Then
   DoCmd.Close acForm, Me.Name, acSaveNo
   DoCmd.OpenForm "Form Name"
Else
     DoCmd.OpenForm Me.Name, acNormal, , , , acDialog
End If

End Sub

אני חייב לציין שבטופס הפשוט הנ"ל אין טיפול במספר נסיונות הפריצה , ולא בתווים זדוניים לפריצה (חפש SQL- INJECT )
משמש רק לבדיקת אימות מול טבלה בשם : tblEmployees ושדות בשם lngEmpID = auto int
strEmpName = string , string = strEmpPassword

בהצלחה