Làm sao đặt password trong Acess

thichinh89

New Member
Hội viên mới
Thưa các anh chị.Làm sao mà có thể đặt password trong Acces được.Mong các anh chị chỉ giúp Em!Em xin cảm ơn!
 
Ðề: Làm sao đặt password trong Acess

Chào bạn, để đặt password trong Access thì bạn làm như sau

Tool/security/Set Database Password. Nhưng nhớ là phải mở file access ở chế độ Open exclusive. Để mở chế độ Open exclusive, chọn File/open, chọn file muốn mở, trên nút Open có một mũi tên hình tam giác, click vào mũi tên và chọn Open exclusive.

Xin lỗi vì bài viết này có vẻ hơi trễ. Nhưng đây là bài viết đầu tiên của mình, mình là sinh viên năm cuối chuyên ngành tin học kế toán. Rất mong mọi người chỉ bảo cho.
 
Ðề: Làm sao đặt password trong Acess

Của bạn thuanctk06 là nhờ MS làm giúp. Mình có hải kiểu làm bằng VBA:
1. Tạo 1table: tblUs có các trường TenDN, MatKhau (PASSWORD)
Bạn tạo 1form (form này bảy đầu tiên khi khởi động chương trình) có: txtTenDN, txtMatKhau, cmdDN.
Tại nút cmdDN (ở chuẩn On Click) viết code như sau:
Private Sub cmdDN_Click()
If Not IsNull(txtTenDN) = DLookup("TenDN", "tblUs", "TenDN='" & txtTenDN.Value & "'") And Not IsNull(txtMatKhau) = DLookup("MatKhau", "tblUs", "MatKhau='" & txtMatKhau.Value & "'") Then
MsgBox "Chao ban " & txtTenDN, vbInformation, "Hello !"
DoCmd.Close
Else
MsgBox "Bye bye ...", vbExclamation, "Bye..."
DoCmd.Quit
End If
End Sub

2. Bạn tạo 1form (form này bảy đầu tiên khi khởi động chương trình) có: txtTenDN, txtMatKhau, cmdDN
Tại nút cmdDN (ở chuẩn On Click) viết code như sau:
Private Sub cmdDN_Click()
If Not IsNull(txtTenDN) = "duyet" And Not IsNull(txtMatKhau) = "111111" Then
MsgBox "Chao ban " & txtTenDN, vbInformation, "Hello !"
DoCmd.Close
Else
MsgBox "Bye bye ...", vbExclamation, "Bye..."
DoCmd.Quit
End If
End Sub


Câu lệnh Docmd.Close bạn hãy thay câu lệnh cho phù hợp với mình nhé
Thân chào !
 
Sửa lần cuối:
Ðề: Làm sao đặt password trong Acess

Thưa các anh chị.Làm sao mà có thể đặt password trong Acces được.Mong các anh chị chỉ giúp Em!Em xin cảm ơn!

Bạn mở Database của bạn ra(nhớ khi mở bạn phải chon Open Exclusive),trên Menu chọn Tools,chọn Security,chọn Set Database password,Acc sẻ mở cái form cho bạn nhập password 2 lần là xong.
 

CẨM NANG KẾ TOÁN TRƯỞNG


Liên hệ: 090.6969.247

KÊNH YOUTUBE DKT

Cách làm file Excel quản lý lãi vay

Đăng ký kênh nhé cả nhà

SÁCH QUYẾT TOÁN THUẾ


Liên hệ: 090.6969.247

Top