Chào cả nhà, em muốn phân quyền khi người dùng Login vào thì trên menu sẽ ẩn đi Menu Tạo Mới, ở đây em đã tạo 1 hàm để lấy Level thông qua cái User Name, nhưng khi đăng nhập với quyền Admin thì không báo lỗi, nhưng với quyền khác 1 thì báo lỗi (admin level 1).
Code:
Private Sub Form_Close()
If Laylv(Me.txtuser) <> 1 Then
Application.CommandBars("mcr_MAIN").Controls(6).Visible = False
End If
End Sub
Khi người dùng đăng nhập thành công thì đóng Form nên em để ở Form_close. Anh kiểm rảnh kt dùm em nhé, nếu co file mẫu phân quyền theo Menu làm = macro or từ Customize thì Shaing em với nha.
File của em:
http://www.mediafire.com/?943cgwwsxbq6b5w
Các đối tượng em để chế độ ẩn, Form tên Login và Modules là PhanQuyen.
Thanks!!