Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Cần giúp ẩn một số thành phần menu access
#1
mình có 1 form đăng nhập ,với 2 ô textbox tên đăng nhập và pass
mình muốn với tên đăng nhâp và pass này menu sẽ hiện đầy đủ
với tên đăng nhâp và pass word khác nó sẽ ẩn một số phần trong menu
hiện mình có 1 bảng lưu trữ usename và pass
[Hình: picture1vxc.png]
code nút đăng nhập
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ữ ký của naphucco Xin chào, mình là naphucco, Tham gia http://thuthuataccess.com/forum từ ngày 09-04 -12.
Reply
Những người đã cảm ơn
#2
không có ai biết à
Chữ ký của naphucco Xin chào, mình là naphucco, Tham gia http://thuthuataccess.com/forum từ ngày 09-04 -12.
Reply
Những người đã cảm ơn
#3
Bạn tham khảo các bài viết với từ khóa bảo mật ở thanh search. Chủ đề loại này rất nhiều trong forum nên mình không nói lại nữa.
http://www.google.com/cse?q=b%E1%BA%A3o+...gsc.page=1
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#4
cái của bạn thì mình biết rồi, mình hỏi làm sao ẩn đi vài mục trong thanh công cụ của mình, chứ mình không nói đên khóa phím shift, lên mạng tìm khắp rồi không có
Chữ ký của naphucco Xin chào, mình là naphucco, Tham gia http://thuthuataccess.com/forum từ ngày 09-04 -12.
Reply
Những người đã cảm ơn
#5
(20-05-12, 01:29 AM)naphucco Đã viết: cái của bạn thì mình biết rồi, mình hỏi làm sao ẩn đi vài mục trong thanh công cụ của mình, chứ mình không nói đên khóa phím shift, lên mạng tìm khắp rồi không có

Các bài viết về phân quyền đã bao gồm việc đó rồi. Đọc kỹ đi nhé!

http://www.google.com/cse?q=b%E1%BA%A3o+...%E1%BB%81n
Chữ ký của Noname 020
ღღღღღTài sản của Noname (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#6
Mình nghĩ bạn nên tạo thêm một formMenu như form Menu chính của bạn nhưng bạn lược bỏ một số chức năng mà bạn thấy phù hợp xong lưu lại với tên khác. Khi đăng nhập bạn cho điều kiện user khi đăng nhập bằng user này thì mở form này user khác thì mở form khác cũng đc. đó bạn.
Chữ ký của riolo05 Xin chào, mình là riolo05, Tham gia http://thuthuataccess.com/forum từ ngày 10-05 -12.
Reply
Những người đã cảm ơn Noname


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  Tạo Menu dạng TreeView bằng Query (không dùng ActiveX) ongke0711 4 268 06-12-16, 09:16 PM
Bài mới nhất: toancvp
Photo [Hỏi] Mở Form trên access 2007 báo lỗi jason 5 195 22-11-16, 09:23 AM
Bài mới nhất: jason
  [Help] Chỉnh giúp Form thống kê hoanghai902 2 130 28-10-16, 06:15 PM
Bài mới nhất: hoanghai902
  Chèn file văn bản word vào access danhxetnghiem 10 456 11-10-16, 03:42 PM
Bài mới nhất: danhxetnghiem
  Xin giúp tạo 1 trường trong table đánh số tự động thay cho autonumber trungminh 7 451 16-09-16, 05:17 PM
Bài mới nhất: maidinhdan

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ