Tùy chọn
Thiết kế Ctrình phân quyền
- Thiết kế Ctrình phân quyền
-
RE: Thiết kế Ctrình phân quyền
Quan_my_love > 26-07-15, 09:58 AM
gửi cho em xin pass demo đi quan mail it.dhquan@gmail.com -
RE: Thiết kế Ctrình phân quyền
Noname > 26-07-15, 02:29 PM
pass VBA là duytuannguyen.
Nếu chương trình trên không đúng pass thì bạn down lại demo
http://duyeagle.googlepages.com/phanquyen2.rar -
RE: Thiết kế Ctrình phân quyền
tranthanhan1962 > 27-07-15, 12:28 AM
Thấy các bạn trao đổi về chương trình thiết kế phân quyền sung quá mình cũng tham gia một tí.
Đây phần mềm mình đã thiết kế cho 1 doanh nghiệp. Mình chỉ chừa lại đối tượng liên quan đến phần phân quyền để các bạn tiện việc tham khảo.
Nhìn chung thì cũng không có gì khác biệt lắm so với demo của bạn Duy Tuấn. chỉ thêm một vài râu ria để hỗ trợ thêm. Để dễ dàng “cảm” được ứng dụng mình sẽ đưa ra một vài phân tích:
1/ Khác với ứng dụng của bạn Duy Tuấn. Hầu như tất cả các code xử lý phân quyền mình đều đặt lên 1 Form duy nhất là F_Login. Form này có record source là table DANHSACHNHANVIEN. Căn cứ vào Quyền sử dụng được xử lý qua giá trị của Value List của Combobox trên form F_DANHSACHNHANVIEN để xử lý phân quyền trên module code của form F_Login. Khi vào chương trình thì form F_Login được open sau đó chỉ bị hidden đi chứ không bao giờ được close để quản lý các trường hợp phân quyền khác. Số lần nhập sai mật khẩu bị giới hạn (trong ứng dụng của mình là 3 lần, các bạn có thể chỉnh sửa tùy ý)
2/Các user của F_Login có quyền tự thay đổi pass của chính mình (không thay đổi pass của user khác được ngoại trừ user có QUYENSUDUNG = 1 / Quản trị chương trình). Các bạn có thể thiết đặt lại tùy ý
3/User Quản trị chương trình quản lý quyền sử dụng của các user khác thông qua field QUYENSUDUNG và DANGKYMATMA trên form F_DANHSACHNHANVIEN. Các control có control source là 2 field này chỉ xuất hiện khi quyền đăng nhập trên F_Login là 1.
4/Khi thay đổi quyền sử dụng. Menu bar sẽ thay đổi sự xuất hiện của các command control để bảo đảm quyền truy cập vào các form, report của từng quyền. hoặc có thể viết code trực tiếp lên các form cụ thể thông qua event Form_Open, Form_Load hoặc event cả control nào đó của nó xử lý lệnh thông qua tham số F_Login. QUYENSUDUNG.Value
5. Sử dụng code Form_Load trên Form F_Login khống chế thời gian sử dụng (vụ này dành khi giao phần mềm hoàn chỉnh mà đối tác chưa giao hết tiền hoặc quảng cáo dùng thử
)
Mã:Private Sub Form_Load()
If Date >= #4/4/2020# Then
DoCmd.Quit
End If
Ngoài ra trên Form F_Login có label TENCONGTY Nhằm so sánh với giá trị field DonviCT của table 01COQUAN nhằm quản lý bản quyền. Nếu thay đổi tên công ty (Tên công ty sẽ được đặt lên tiêu đề các report) phần mềm sẽ bị khóa.
6/Xử lý mật khẩu khóa phím shift trong code để không cho kẻ lạ mặt vào database.
7/ Vì ứng dụng này được trích từ phần mềm kế toán thương mại của mình nên không có user Guest. Bạn nào thích thì thiết đặt thêm. Mình không đặt pass VBA vì khi bàn giao ứng dụng chỉ giao tập tin MDE. Tập tin lưu giữ MDB đặt pass chỉ mất công thêm mà hiện giờ các phần mềm gỡ pass cũng nhiều nên có đặt pass cũng vô hiệu.
*Các mật khẩu của ứng dụng:
Mật khẩu các user : 1111
Mật khẩu mở khóa phím shift: thuthuataccess (ứng dụng post lên mình chưa khóa shift)
![[Hình: blpT8eg.png]](http://i.imgur.com/blpT8eg.png)
Mong rằng ứng dụng này sẽ hỗ trợ phần nào cho các bạn
Demo -
RE: Thiết kế Ctrình phân quyền
William > 31-05-17, 03:33 PM
Anh chị giúp dùm em với, em login vào mà không được, mới đầu Admin vô dc giờ không vô dc luôn, ko biết e sai chỗ nào, cám ơn mọi người
http://www.mediafire.com/file/01d635c11s...ogin.accdb
-
RE: Thiết kế Ctrình phân quyền
tranthanhan1962 > 31-05-17, 07:43 PM
Thứ nhất, trong field Quyen, dữ liệu của 3 record chỉ có quyền "User" đâu có quyền "Admin" hay quyền "Quanli" như trong code mà vô được.
Thứ 2, Nếu vô được cũng sẽ báo lỗi vì thiếu form "Main_testNV".
Thứ 3, Form "Login" của bạn chỉ giải quyết cho 1 record đầu tiên của user "Admin", chứ không thể xử lý được nhiều user. -
RE: Thiết kế Ctrình phân quyền
William > 31-05-17, 08:00 PM
Em quên để form Main_testNV mất. cái 1 với cái 2 em xem ổn rồi, còn cái thứ 3 của a em phải làm sao? xài câu lệnh IF ELSEDocmd.openform tiếp hả anh ?
em sửa lại cái QUyen la Admin va user roi, nhung sao bấm nút đăng nhập nó vẫn không vô anh
-
RE: Thiết kế Ctrình phân quyền
tranthanhan1962 > 31-05-17, 09:07 PM
Để quản lý nhiều user có thể có nhiều cách.
Trong demo của mình mình dùng event TENNGUOIDUNG_AfterUpdate để current record chạy đến record của user. Bạn có thể dùng cách này, hoặc nếu muốn dùng form login không liên kết bạn có thể dùng hàm dlookup để sử dụng tìm giá trị password trong table so sánh với giá trị password trong form cũng được -
RE: Thiết kế Ctrình phân quyền
William > 31-05-17, 09:35 PM
Cám ơn anh, em làm được rồi, hihi