Làm thế nào để sử dụng phương pháp OpenDatabase để mở mật khẩu bảo vệ cơ sở dữ liệu Access 2000

QUAN TRỌNG: Bài viết này được dịch bằng phần mềm dịch máy của Microsoft chứ không phải do con người dịch. Microsoft cung cấp các bài viết do con người dịch và cả các bài viết do máy dịch để bạn có thể truy cập vào tất cả các bài viết trong Cơ sở Kiến thức của chúng tôi bằng ngôn ngữ của bạn. Tuy nhiên, bài viết do máy dịch không phải lúc nào cũng hoàn hảo. Loại bài viết này có thể chứa các sai sót về từ vựng, cú pháp hoặc ngữ pháp, giống như một người nước ngoài có thể mắc sai sót khi nói ngôn ngữ của bạn. Microsoft không chịu trách nhiệm về bất kỳ sự thiếu chính xác, sai sót hoặc thiệt hại nào do việc dịch sai nội dung hoặc do hoạt động sử dụng của khách hàng gây ra. Microsoft cũng thường xuyên cập nhật phần mềm dịch máy này.

Nhấp chuột vào đây để xem bản tiếng Anh của bài viết này:209953
Bài viết này đã được lưu trữ. Bài viết được cung cấp "nguyên trạng" và sẽ không còn được cập nhật nữa.
Vừa phải: Đòi hỏi vĩ mô cơ bản, mã hóa, và khả năng tương tác kỹ năng.

Bài viết này chỉ áp dụng cho một cơ sở dữ liệu Microsoft Access (.mdb).

TÓM TẮT
Bài viết này mô tả cách sử dụng các OpenDatabase phương pháp để mở một cơ sở dữ liệu Microsoft Access có một cơ sở dữ liệu mật khẩu. Lưu ý rằng điều này là khác nhau từ việc mở một cơ sở dữ liệu được bảo vệ với tính năng bảo mật cấp người sử dụng Microsoft Access.
THÔNG TIN THÊM
Nếu bạn muốn sử dụng các OpenDatabase phương pháp để mở cơ sở dữ liệu mật khẩu bảo vệ, chỉ định các cơ sở dữ liệu mật khẩu như là một phần của các Kết nối đối số. Cú pháp để mở một cơ sở dữ liệu với các OpenDatabase phương pháp là như sau:
Đặt db = workspace.OpenDatabase)dbname, tùy chọn, chỉ đọc, kết nối)
LƯU Ý: Mặc dù các Tuỳ chọnChỉ đọc đối số của các OpenDatabase phương pháp được diễn tả trong trợ giúp như là đối số tùy chọn, bạn phải cung cấp cho họ khi bạn sử dụng các Kết nối đối số. Nếu bạn sử dụng một Kết nối đối số và bạn không cung cấp các Tuỳ chọnChỉ đọc đối số, bạn nhận được thời gian chạy lỗi 3031:
Không phải là một mật khẩu hợp lệ.
Bạn nhận được thông báo lỗi này ngay cả khi mật khẩu mà bạn đã cung cấp trong các Kết nối đối số là chính xác. Nếu bạn không cần phải sử dụng một Kết nối đối số, bạn có thể bỏ qua các Tuỳ chọnChỉ đọc đối số.

Khi bạn sử dụng các OpenDatabase phương pháp để mở một mật khẩu bảo vệ Access database, các Kết nối đối số của các OpenDatabase phương pháp yêu cú pháp sau:
MS Access; pwd =mật khẩu
Sử dụng các OpenDatabase phương pháp để mở cơ sở dữ liệu mẫu Northwind.mdb (đó là bảo vệ bằng mật khẩu cơ sở dữ liệu của "northwind"), làm theo các bước sau:

LƯU Ý: Mẫu mã trong bài viết này sử dụng truy cập dữ liệu của Microsoft Các đối tượng. Đối với mã này để chạy đúng cách, bạn phải tham khảo Microsoft DAO 3.6 Đối tượng thư viện. Để làm điều này, bấm Tham khảo trên các Công cụ trình đơn trong Visual Basic Editor, và đảm bảo rằng các Microsoft DAO 3,6 đối tượng thư viện chọn hộp kiểm.

THẬN TRỌNG: Nếu bạn làm theo các bước trong ví dụ này, bạn sửa đổi mẫu cơ sở dữ liệu Northwind.mdb. Bạn có thể muốn sao lưu các tập tin Northwind.mdb và làm theo các bước trên một bản sao của cơ sở dữ liệu.

  1. Bắt đầu Microsoft Access và mở cơ sở dữ liệu mẫu Northwind.mdb cho truy cập độc quyền. Để làm điều này, bấm Cơ sở dữ liệu mở trên các Tệp trình đơn, nhấp vào mũi tên vào các Mở nút để hiển thị các tùy chọn, và sau đó nhấp vào Độc quyền mở.
  2. Trên các Công cụ trình đơn, điểm đến Bảo mật, và sau đó nhấp vào Thiết lập cơ sở dữ liệu mật khẩu.
  3. Loại Northwind trong cả hai các Mật khẩuKiểm chứng hộp.
  4. Nhấp vào Ok để đóng những Thiết lập cơ sở dữ liệu mật khẩu hộp thoại.
  5. Đóng cơ sở dữ liệu.
  6. Tạo một cơ sở dữ liệu mới, trống.
  7. Tạo một mô-đun và gõ thủ tục sau đây:

    LƯU Ý: Thay thế đường dẫn chính xác để Northwind.mdb trên đĩa cứng của bạn trong mẫu mã sau đây.
    Sub OpenDB() Dim db As DAO.Database Dim ws As DAO.WorkSpace Dim rst As DAO.Recordset Set ws = DBEngine.WorkSpaces(0) Set db = ws.OpenDatabase _ ("C:\Program Files\Microsoft Office\Office\Samples\Northwind.mdb", _ False, False, "MS Access;PWD=northwind") Set rst = db.OpenRecordset("Customers", dbOpenDynaset) If rst.RecordCount > 0 Then   rst.MoveLast   MsgBox rst!CustomerID End If rst.Close db.CloseEnd Sub					
  8. Để kiểm tra thủ tục này, gõ dòng sau trong các Debug cửa sổ, và sau đó nhấn ENTER:
    OpenDB
    Lưu ý rằng một hộp thông điệp sẽ hiển thị ID khách hàng cuối cùng ghi lại trong khách hàng bảng, chỉ ra rằng cơ sở dữ liệu đã thành công mở.
THAM KHẢO
Để biết thêm thông tin về phương pháp OpenDatabase, bấm Trợ giúp Microsoft Visual Basic trên các Trợ giúp trình đơn, loại phương pháp opendatabase trong trợ lý văn phòng hoặc thuật sĩ trả lời, và sau đó bấm Tìm kiếm để xem các chủ đề.

Để biết thêm chi tiết về cơ sở dữ liệu mật khẩu, bấm Trợ giúp Microsoft Access trên các Trợ giúp trình đơn, loại bảo vệ cơ sở dữ liệu truy cập microsoft (.mdb) tập tin với một mật khẩu hoặc mã hóa trong trợ lý văn phòng hoặc các Thuật sĩ trả lời, và sau đó nhấp vào Tìm kiếm để xem các chủ đề trở lại.
pwd an toàn

Cảnh báo: Bài viết này được dịch tự động

Thuộc tính

ID Bài viết: 209953 - Xem lại Lần cuối: 12/05/2015 11:15:51 - Bản sửa đổi: 3.0

Microsoft Access 2000 Standard Edition

  • kbnosurvey kbarchive kbautomation kbpasswords kbdatabase kbopenfile kbhowto kbprogramming kbmt KB209953 KbMtvi
Phản hồi