Viết bởi: garupro 20-05-12, 09:22 PM Chuyên mục: Thư Viện Ứng Dụng - Bài trả lời (7) |
http://www.mediafire.com/?lw5nvpoemwocebz
Trích dẫn:Quản lý công việc V1.0
Trích dẫn:Quản lý công việc V2.0
Viết bởi: riolo05 20-05-12, 06:18 PM Chuyên mục: Forms - Bài trả lời (13) |
Viết bởi: favouritekid 20-05-12, 12:25 PM Chuyên mục: Forms - Bài trả lời (4) |
Viết bởi: daiphong1979 19-05-12, 07:01 PM Chuyên mục: Forms - Bài trả lời (2) |
Viết bởi: naphucco 19-05-12, 05:16 PM Chuyên mục: Forms - Bài trả lời (5) |
Trích dẫn:Private Sub cmdDangNhap_Click()
If IsNull(Me.cboUserID) Or Me.cboUserID = "" Then
msgBoxOK DLookup("[NoiDung1]", "tblThongBao", "[SoTB] = 1"), vbCritical, DLookup("[TieuDe]", "tblThongBao", "[SoTB] = 1")
Me.cboUserID.SetFocus
Exit Sub
End If
If IsNull(Me.txtPassword) Or Me.txtPassword = "" Then
msgBoxOK DLookup("[NoiDung2]", "tblThongBao", "[SoTB] = 1"), vbCritical, DLookup("[TieuDe]", "tblThongBao", "[SoTB] = 1")
Me.txtPassword.SetFocus
Exit Sub
End If
If Me.txtPassword.Value = Me.txtPasstemp Then
USERNAME = Me.txtUserName.Value
USERID = Me.cboUserID.Value
UserLevel = Me.txtUserLevel.Value
UserPASS = Me.txtPassword.Value
DoCmd.Close
DoCmd.OpenForm "main"
Else
msgBoxOK DLookup("[NoiDung1]", "tblThongBao", "[SoTB] = 2"), vbCritical, DLookup("[TieuDe]", "tblThongBao", "[SoTB] = 2")
Me.txtPassword.SetFocus
End If
intLogonAttempts = intLogonAttempts + 1
If intLogonAttempts > 3 Then
msgBoxOK DLookup("[NoiDung2]", "tblThongBao", "[SoTB] = 2"), vbCritical, DLookup("[TieuDe]", "tblThongBao", "[SoTB] = 2")
Application.Quit
End If
End Sub
Chủ đề Mới nhất |
Wanted to apprehend what ... -Chuyên mục: Ms PowerPoint-Đăng bởi lần cuối: Vjiupsavarf-1 Giờ trước- » Bài trả lời: 0- » Lượt xem: 2 |
[Demo-Phần 4] Tạo khóa bả... -Chuyên mục: Thư viện thủ thuật-Đăng bởi lần cuối: ngochuong279-4 Giờ trước- » Bài trả lời: 38- » Lượt xem: 5,429 |
Mix đồ với giày nữ đen tr... -Chuyên mục: Chuyện bốn phương-Đăng bởi lần cuối: annettekirtont-7 Giờ trước- » Bài trả lời: 0- » Lượt xem: 5 |
offtopic -Chuyên mục: Trao đổi Góp ý-Đăng bởi lần cuối: arikaogde-Hôm qua, 11:04 PM- » Bài trả lời: 0- » Lượt xem: 3 |
Trợ giúp về Textbox với c... -Chuyên mục: Forms-Đăng bởi lần cuối: Nguyên Thông-18-04-24, 10:15 PM- » Bài trả lời: 16- » Lượt xem: 5,869 |
In mã vạch tạo từ access ... -Chuyên mục: Forms-Đăng bởi lần cuối: huyhoang22-15-04-24, 11:25 AM- » Bài trả lời: 38- » Lượt xem: 20,781 |
Dòng Thơ Nhạc Trích Đoạn -Chuyên mục: Góc Thơ -Đăng bởi lần cuối: Nguyễn Thành Sáng-11-04-24, 06:04 PM- » Bài trả lời: 2- » Lượt xem: 38 |
Kết nối bảng từ access A ... -Chuyên mục: Thủ thuật VBA-Đăng bởi lần cuối: hieunx-11-04-24, 01:23 PM- » Bài trả lời: 5- » Lượt xem: 73 |
Lấy dữ liệu từ 1 cột của ... -Chuyên mục: Query-Đăng bởi lần cuối: ongke0711-09-04-24, 11:34 AM- » Bài trả lời: 11- » Lượt xem: 563 |
Quản lý kho bằng Accesss -Chuyên mục: Thảo Luận Access-Đăng bởi lần cuối: recca123-07-04-24, 11:27 PM- » Bài trả lời: 38- » Lượt xem: 1,503 |
Diễn đàn Thống kê |
» Thành viên: 4,481 » Thành viên mới nhất: Vjiupsavarf » Các chủ đề diễn đàn: 9,859 » Các bài viết diễn: 48,439 Thống kê đầy đủ |