Sau đây là một số bước cơ bản để bạn dựng được trang đăng nhập
1. Tạo bảng tblSecurityLevel như sau:
2. Tạo bảng tblWorker có trường UserType liên kết với tlbSecurityLevel. và bảng tblUser như sau
3.Tạo form Login dạng Dialog form design.
4. Thêm 2 đối tượng cho Login Form txtUserName , txtPassword
5. Tại nút cancel thêm macro
6. Tại nút OK button, tại sự kiện click chọn Event Procedure và đưa code vào như sau:
Private Sub Command1_Click() Dim User As String Dim UserLevel As Integer Dim TempPass As String Dim ID As Integer Dim workerName As String Dim TempLoginID As String If IsNull(Me.txtUserName) Then MsgBox "Please enter UserName", vbInformation, "Username requeired" Me.txtUserName.SetFocus ..................... ..................... End If End If End Sub
7. Mở thuộc tính của access Quick Access Option chọn display form là: login Form:
Đó là một số bước cơ bản để xây dựng trang đăng nhập, nếu bạn muốn hướng dẫn trực tiếp vui lòng email: dinhanhtuan68@gmail.com
hoặc tải code vừa đăng nhập vừa có phân quyền tại đây
hoặc tham gia khóa học có cố vấn hướng dẫn tại đây
hoặc tải code vừa đăng nhập vừa có phân quyền tại đây
hoặc tham gia khóa học có cố vấn hướng dẫn tại đây