Đánh giá chủ đề:
  • 6 Votes - 3.33 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Phân quyền truy cập menu trong Access
#21
(26-08-10, 08:35 PM)Noname Đã viết: Mình đã giới thiệu với các bạn chương trình phân quyền
thiet-ke-ctrinh-phan-quyen
Mình cũng giới thiệu các bạn cách bạn cách tạo 1 thanh menu
huong-dan-tao-menu-trong-access.html
Hôm nay mình xin giới thiệu cách để hiển thị 1 menu với user này và ẩn với user khác.


Ta hãy mở 1 module và soạn thủ tục sau:

Mã:
Sub ViewMenu(User as String, mnBar as string, mnItem as String, IsView as Boolean)

If currUser= User Then  
    CommandBars(mnBar).Controls(mnItem).Visible = isView
End If
End Sub
Thủ tục trên cho ta hiện 1 menu với
Mã:
User
: user muốn cho phép xem
Mã:
CurrUser
: User hiện tại đăng nhập vào hệ thống. ( bạn có thể gán 1 biến toàn cục, mỗi khi có người đăng nhập thành công, thì gán : CurrUser bằng UserName)
Mã:
mnBar
: tên thanh menu do bạn tự tạo
Mã:
mnItem
: tên menu (caption) do bạn tạo và gắn trên thanh Menu

Ví dụ:
Trong bài đăng về tạo menu http://thuthuataccess.blogspot.com/2009/...ccess.html

Bạn tạo 1 thanh menu "QuanLyCongVan" với 2 Item là : "Cập Nhật", và "Thoát".Bây giờ bạn muốn chỉ hiện menu "Cập Nhật" cho User, và Admin. ( nhóm guest không được thấy) ta gọi sau khi người dùng đăng nhập thành công:
Mã:
ViewMenu "User", "QuanLyCongVan", "Cập Nhật", True
    ViewMenu "Admin", "QuanLyCongVan", "Cập Nhật", True
    ViewMenu "Guest", "QuanLyCongVan", "Cập Nhật", False

Các ace giàu kinh nghiệm làm việc với access cho hỏi tạo Menu của chương trình bằng Toolbars thì object nào chứa menu này. Ví dụ: tạo menu bằng macro thì nó sẽ nằm trong object marco của access.
Rất mong nhận được hồi đáp của quý ace.
Trân trọng./.
Chữ ký của dannynguyen1980 Xin chào, mình là dannynguyen1980, Tham gia http://thuthuataccess.com/forum từ ngày 14-09 -11.
Reply
Những người đã cảm ơn khải nguyên
#22
(20-12-10, 07:59 PM)khanhduycsgt Đã viết: ai ở SG có dịp xuống Thủ Đức hú mình 1 tiếng nha! ^^
Y!: khanhduycsgt
fb: http://www.facebook.com/khanhduycsgt

cám ơn bạn haquocquan phát nữa! big green
Yêu cầu bạn Khanhduycsgt hảy tỏ ra mình là người lịch sự thì nên gở câu này bỏ trong phần chủ ký của bạn "để tỏ rõ mình là người lịch sự nào! ^^"
Chữ ký của nhocnhim0009 Xin chào, mình là nhocnhim0009, Tham gia http://thuthuataccess.com/forum từ ngày 28-01 -15.
Reply
Những người đã cảm ơn khải nguyên , jason


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Thủ Thuật] Hiểu đúng về phân quyền - MDE - SQL Backend ckno1no 6 660 28-07-16, 05:16 PM
Bài mới nhất: maidinhdan
  Lấy về số seri CPU, ổ cứng MainBoard trong Access Noname 33 12,288 08-06-16, 11:23 PM
Bài mới nhất: maidinhdan
  [Thủ Thuật] Ẩn record trong table theo ngày tháng tvn_hut 6 486 24-04-16, 01:00 AM
Bài mới nhất: tvn_hut
  Thuộc tính Startup MS Access toàn tập với VBA Noname 2 2,736 18-04-16, 04:50 PM
Bài mới nhất: ongke0711
  Hàm đọc số dùng mã Unicode trong Access Noname 28 11,700 23-03-16, 11:45 PM
Bài mới nhất: thiennamlong

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ơ