Tùy chọn
[Demo P1] Code Ẩn tất cả mọi thứ, ngoại trừ Form+Report
- [Demo P1] Code Ẩn tất cả mọi thứ, ngoại trừ Form+Report
-
RE: Demo_Code Ẩn tất cả mọi thứ, ngoại trừ Form+Report
nhphuqui > 17-09-15, 01:36 PM
5 char -
RE: Demo_Code Ẩn tất cả mọi thứ, ngoại trừ Form+Report
maidinhdan > 18-09-15, 12:21 AM
(17-09-15, 01:36 PM)nhphuqui Đã viết: Làm thế nào để tag bác maidinhdan vào nhỉ? Mình thấy chương trình có khoản ghị lại lịch sử đăng nhập rất hay, không biết bác có thể share không?
Để mở chương trình, bạn đè shift để vào xem.
Còn pass để mở xem code: đã gửi qua hộp thư Email cho bạn, nhớ check nhé.
Ghi chú: Demo này không có phần ghi lại lịch sử đăng nhập đâu.
Link này mới có ( vừa phân quyền + Ghi lại lịch sử): http://thuthuataccess.com/forum/post-278...l#pid27851 ( đọc đến bài #10 nhé)
Thân mến, chúc bạn thành công. -
RE: Demo_Code Ẩn tất cả mọi thứ, ngoại trừ Form+Report
nhphuqui > 18-09-15, 10:04 AM
5 char -
RE: Demo_Code Ẩn tất cả mọi thứ, ngoại trừ Form+Report
maidinhdan > 18-09-15, 11:35 AM
(18-09-15, 10:04 AM)nhphuqui Đã viết:
(18-09-15, 12:21 AM)maidinhdan Đã viết: Để mở chương trình, bạn đè shift để vào xem.
1/Làm sao để phân quyền cấp 1 thì không xóa record được, chỉ cấp 2 mới xóa được thôi.
Còn pass để mở xem code: đã gửi qua hộp thư Email cho bạn, nhớ check nhé.
Ghi chú: Demo này không có phần ghi lại lịch sử đăng nhập đâu.
Link này mới có ( vừa phân quyền + Ghi lại lịch sử): http://thuthuataccess.com/forum/post-278...l#pid27851 ( đọc đến bài #10 nhé)
Thân mến, chúc bạn thành công.
2/Cách để sử dụng append query để lưu record đã xóa ( sử dụng nút delete bàn phím) vào tblrac kèm theo người xóa và ngày giờ xóa. Bác thông cảm cho mình xin cái Demo nha tại mình rất ngu phần query!!!
Cho mình hỏi vài câu hơi riêng tư nhé, vì mình cho link phía trên có lẽ đã đủ để bạn hiểu và học làm theo, nên bạn cho mình biết thông tin như sau: để mình viết bài hướng dẫn cho bạn học tập
1. Học đến lớp mấy?
2. Bạn bao nhiêu tuổi?
3. Tiếp xúc với Access bạn có thể tự viết hàm để xóa hay đóng mở form không, thay vì dùng công cụ có sẳn của Access.
Mình muốn nắm độ am hiểu của Access để có bài viết tương thích để bạn đọc dễ hiểu.
1 Demo tuy nhỏ nhưng khi viết hướng dẫn, không chỉ là 1 hay 2 trang giấy, đôi khi phải cả chục trang giấy mà vẫn chưa xong. Còn kho nửa thì làm Video cho nó gọn. Còn video không hiểu nửa thì đặt dùm 1 vé xe, để mình tới nhà chỉ tận tình miễn phí
-
RE: Demo_Code Ẩn tất cả mọi thứ, ngoại trừ Form+Report
nhphuqui > 18-09-15, 12:12 PM
5 char -
RE: Demo_Code Ẩn tất cả mọi thứ, ngoại trừ Form+Report
maidinhdan > 18-09-15, 02:53 PM
(18-09-15, 12:12 PM)nhphuqui Đã viết: Mình học 12, mới học access lần đầu, viết code thì kiểu học lóm từ demo rồi sửa code lại thì được, còn tự viết 100% thì mình có thể viết được hàm đóng mở form hay report gì đó à, query mình chưa học gì hết; mình dân không chuyên nên chỉ cần cái Demo để sửa code lại rồi xài thôi. Đây là demo mình cần có tbl để lưu record lại: https://drive.google.com/file/d/0BwC5fm1...sp=sharing
Mình tính làm Demo đăng nhập chèn vào bài bạn luôn rồi, nhưng rất tiếc là không thể nào mở code VBA của bạn được. ( cứ báo lỗi suốt, có lẽ bạn thiết kế trên Access 2007/2010 rồi chuyển về Access 2003 phải không?
Cái demo link phía trên đơn giản lắm, bạn sử dụng Demo đăng nhập của mình như sau:
1. Import tất cả vào bài của bạn
2. Xóa chọn Startup QuanLiViPham
3. Mở form: frmMain lên sửa nút nào mà bạn muốn người ta nhấn để mở form QuanLiViPham ( ở đây có 2 hướng khóa)
+ làm ẩn nút mở form QuanLiViPham, ở đây ta sẽ chèn vào sự kiện Form_Load của form frmMain; thay chữ Command1,2,3,....thành nút nhấn mở form của bạn muốn ấy, ở đây tôi ví dụ Command1 thay bằng chữ "Quản lý vi phạm"
+ hoặc nút mở form QuanLiViPham(chữ "Quản lý vi phạm") vẫn nhấn được, ta sẽ chèn vào sự kiện Form_Load ở form QuanLiViPham bằng cú pháp như sau:
Mã PHP:Private Sub Form_Load()
Select Case HamlayCapdo
Case 9
' Đây là cú pháp mở form'
Docmd.Openform "QuanLiViPham"
Case 8
' Đây là cú pháp mở form'
Docmd.Openform "QuanLiViPham"
' Giả sử nếu có quyền là 8 sẽ khóa nút xóa'
Me.cmdXoa.Enable = False
Case 7
' Đây là cú pháp mở form'
Docmd.Openform "QuanLiViPham"
' Giả sử nếu có quyền là 7 sẽ khóa nút xóa + Nút Thêm'
Me.cmdXoa.Enable = False
Me.cmdThem.Enable = False
End Select
End Sub
* Bạn có thể thêm, Case = bao nhiêu vào tương ứng với table tblNguoidung
Tất cả nên đưa vào sự kiện form Load thì hay nhất.
Xin trích lại link và Demo hình
![[Hình: demodangnhap.jpg]](https://sites.google.com/site/thuthuataccess2003/home/demo-hinh/demodangnhap.jpg)
Link Demo đăng nhập + ghi lại lịch sử: Tải xuống
Chúc bạn thành công -
RE: Demo_Code Ẩn tất cả mọi thứ, ngoại trừ Form+Report
nhphuqui > 18-09-15, 05:04 PM
5 char -
RE: Demo_Code Ẩn tất cả mọi thứ, ngoại trừ Form+Report
maidinhdan > 18-09-15, 06:59 PM
(18-09-15, 05:04 PM)nhphuqui Đã viết: Mình cảm ơn bác nhiệt tình, cái phần phân quyền truy cập thì từ những cmt trước của bác mình đã làm được rồi, chỉ có phần tự động chạy append query khi nhấn nút delete từ bàn phím thì nó sẽ chuyển record từ tbl gốc vào tbl lưu trữ và( chỉ những tài khoản chỉ định mới có quyền xóa - cái này có cũng đc, k có cũng k sao) là mình chưa làm được. Chắc tại mình nói không rõ nên bác hiểu nhầm ý!
Mình không biết bạn nói cái gì nửa: đoạn này "chỉ có phần tự động chạy append query khi nhấn nút delete từ bàn phím thì nó sẽ chuyển record từ tbl gốc vào tbl lưu trữ"
* Demo trong bài này, sẽ không dùng được nút Delete từ bàn phím để xóa đâu. -
RE: Demo_Code Ẩn tất cả mọi thứ, ngoại trừ Form+Report
nhphuqui > 19-09-15, 06:13 PM
Nói chung, mình xin bác cái Demo lưu trữ những record bị xóa.