-
07-29-2010, 02:59 AM #1Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 4
Đặt password cho Front End bằng VB
:xinloinhe:
Mình đang muốn làm cái phần đặt pass cho Front End bằng VB thay vì dùng cái mặc định của Access.
Và ý tưởng của mình là trên Front End sẽ tạo 1 nút mở một cái file Access Changepass khác có cùng thư mục với Front End để đổi pass cho Front End .
Nhưng vấn đề nằm ở chỗ mình đã thử 3 cách từ dùng Shell, hàm API mà nó chỉ có thể mở pm Access nên chứ không mở cái file Changepass.
Bác nào có cách mở 1 pm access từ 1 pm access khác không ?
Hay có cách nào để đổi pass hay hơn thì chỉ em với .
:k5429592:View more random threads:
- Xuất Nhập Tồn Kho Đông Lạnh
- Hiện nội dung từng lỗi theo bảng (table) ta dựng sẵn.
- phần mềm kế toán ms access+sql server
- Lỗi khi import dữ liệu vào table
- Xin code khóa màn hình nhập liệu của form
- Cho mình hỏi có cách nào để kiểm tra 1 Control có nhận Focus hay không ?
- Vấn đề với sự kiện BeforeDelConfirm ?
- chế độ xem form, report trong access
- [Hỏi] Biểu tượng hình tam giác màu vàng có dấu chấm thang trong macro !!!
- Chỉ giùm việc tự động điều chỉnh textbox trong report
-
07-29-2010, 05:20 PM #2Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Đặt password cho Front End bằng VB
Gửi bởi glasseggs
2/ Dùng file access khác thì muốn mở file này hãy dùng kỹ thuật DAO hoặc ADODB (Dùng DAO đơn giản hơn ADOD8-)
Thân
-
07-29-2010, 05:48 PM #3Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: Đặt password cho Front End bằng VB
Cách 1 dễ nhất nhưng cũng không an toàn nhất,nó lưu pass vào table.
Em muốn dùng phần đặt pass của chính access cơ bác. Mà cái DAO thì em chịu.
-
07-29-2010, 05:58 PM #4Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 5
Ðề: Đặt password cho Front End bằng VB
Gửi bởi glasseggs
Mã nguồn PHP:[COLOR=#000000]
Dim AppPass [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Database Dim rPass [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]Recodset Dim TenTapTin [/COLOR][COLOR=#007700]As [/COLOR][COLOR=#0000BB]String Set TenTapTin [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]CurrentProject[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]Path [/COLOR][COLOR=#007700]& [/COLOR][COLOR=#DD0000]"\PassChange.mdb" [/COLOR][COLOR=#0000BB]Set AppPass [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]DBEngine[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]0[/COLOR][COLOR=#007700]).[/COLOR][COLOR=#0000BB]OpenDatabase[/COLOR][COLOR=#007700]([/COLOR][COLOR=#0000BB]TenTapTin[/COLOR][COLOR=#007700]) [/COLOR][COLOR=#0000BB]Set rPass [/COLOR][COLOR=#007700]= [/COLOR][COLOR=#0000BB]AppPass[/COLOR][COLOR=#007700].[/COLOR][COLOR=#0000BB]OpenRecordset[/COLOR][COLOR=#007700]([/COLOR][COLOR=#DD0000]"tblPass"[/COLOR][COLOR=#007700], [/COLOR][COLOR=#0000BB]dbOpenTable[/COLOR][COLOR=#007700]) ................... [/COLOR]
-
07-30-2010, 05:28 PM #5Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 15
Ðề: Đặt password cho Front End bằng VB
Cho em hỏi chút ,đoạn code này cho vào sự kiện Click của command button à.
Mà khi em chạy nó báo lỗi :
Object required ở dòng Set TenTapTin =
Mà còn cái này nữa :
\PassChange.mdb : là cái file sẽ mở phải không ?
Vậy cái tblPass là cái gì hở bác ?
-
07-30-2010, 06:16 PM #6Silver member
- Ngày tham gia
- May 2016
- Bài viết
- 0
Ðề: Đặt password cho Front End bằng VB
Gửi bởi glasseggs
-
07-30-2010, 06:31 PM #7Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Đặt password cho Front End bằng VB
Gửi bởi glasseggs
tblPass tà tên Table trong cái PassChange.mdb cần mở, còn mở để lam gì là tùy ý bạn
Thân
-
07-31-2010, 05:04 PM #8Junior Member
- Ngày tham gia
- Nov 2015
- Bài viết
- 0
Ðề: Đặt password cho Front End bằng VB
Mấy bác ơi nhưng em chạy đoạn này nó vẫn lỗi :
Object required ở dòng Set TenTapTin =
Và nếu ở file PassChange.mdb em không muốn mở cái table đó lên mà chỉ muốn mở cái PassChange.mdb nên có được không ?
Vì trong file PassChange.mdb này không có table nào mà chỉ có 1 cái Form dùng để đổi pass bằng code cho cái file khác thôi.
-----------------------------------------------------------------------------------------
Có lẽ bác hiểu nhầm ý em thật. Em xin trình bày rõ lại như sau :
Em có 2 file ChangePass.accdb và CRMS.accdb (Front End)
File ChangePass.accdb nhằm mục đích đổi pass cho CRMS.accdb (Pass này là pass của Access quản lý chứ không phải pass cho lưu vào table nhé )
Và file ChangePass.accdb chỉ có 1 cái Form có 2 textbox Oldpass và Newpass và 1 nút có code như sau :
Mã:Sub setPass(oldPass as String, newPass As String) Set tempDB = OpenDatabase(CurrentProject.Path & "\" & "CRMS.accdb ", True, False, "MS Access;PWD=" & oldPass) tempDB.NewPassword oldPass, NewPass tempDB.Close End Sub Private Sub Command1_Click() setPass Oldpass, Newpass end sub
-
07-31-2010, 06:31 PM #9Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Đặt password cho Front End bằng VB
Gửi bởi glasseggs
Thân
-
07-31-2010, 06:51 PM #10Junior Member
- Ngày tham gia
- Aug 2015
- Bài viết
- 0
Ðề: Đặt password cho Front End bằng VB
Nói "một câu" ngắn gọn:
Bạn glasseggs không nên "cố chấp" cho cái quan điểm của mình khi làm cái vụ này.
Vì nó phá sản ngay cái ý tưởng mở một cái form từ mdb khác để thay đổi cái password của cái mdb hiện hành (tức cái Front End đang mở của bạn). Một lẽ đơn giản là nó bị đụng về quyền truy cập. Bởi cái Front End đang mở, nó mở theo một file ldb để quản lý cái vụ truy cập. Một remote khác truy cập vào nó sẽ bị "đụng" ngay cái ldb này.
Với một người đã có một ít năm làm việc với Access, tôi chỉ khuyên bạn là hãy suy nghĩ một cách đơn giản, đừng tự gây khó cho mình quá.
Các mẫu cột cổng đá đẹp nhất được làm từ đá xanh tự nhiên có độ bền coi như vĩnh cửu dù cột đá được đặt ngoài hiên có thể chịu mưa , chịu nắng. Mẫu mã đẹp nhất, chạm khắc hoa văn đẹp, tinh tế. ...
Mẫu mẫu cột cổng đá được làm bằng đá xanh tự nhiên đẹp nhất hiện nay