Tham Chiếu Đến Microsoft Dao 3.6 Object Library

Hình 7.17. Tham chiếu đến Microsoft DAO 3.6 Object Library

Sơ đồ sau minh họa kiến trúc phân tầng gồm nhiều thành phần, đối tượng trong mô hình DAO.

Hình 7.18. Các đối tượng và tập hợp trong kiến trúc DAO

1. DBEngine

DBEngine là một lớp được dùng như một cầu nối giữa động cơ chương trình ứng dụng và Jet DBEngine. DBEngine đại diện cho đối tượng DBEngine – vốn là đối tượng cao cấp nhất trong hệ thống DAO.

Đối tượng DBEngine kiểm soát tất cả các đối tượng CSDL trong CSDL thông qua một hệ thống phân cấp tập hợp, đối tượng và thuộc tính. Khi mở một CSDL MS Accessss, trước tiên đối tượng DBEngine thiết lập tập hợp Workspace và một đối tượng Workspace mặc định. Nếu nhóm làm việc của bạn được bảo mật, MS Access nhắc bạn nhập UID và Password để đối tượng DBEngine có thể tạo một đối tượng người dùng (user) và một đối tượng nhóm (group) ở vùng làm việc mặc định. Nếu nhóm làm việc không được bảo mật, DBEngine tạo một tài khoản người dùng mặc định là Admin trong nhóm mặc định Admins.

Cuối cùng, DBEngine tạo đối tượng Database trong phạm vi đối tượng Workspace mặc định. DBEngine sử dụng thông tin đối tượng User và/hoặc Group hiện hành để quyết định bạn có thẩm quyền truy cập các đối tượng trong CSDL hay không.

Sau khi DBEngine tạo đối tượng Database, động cơ chương trình ứng dụng kiểm tra các tùy chọn khởi động CSDL để hiển thị Form khởi động, thanh menu, thanh tiêu đề hay sử dụng một hoặc nhiều tùy chọn khởi động khác.

2. Errors

Chứa tất cả các đối tượng Error trong DAO. Khi thi hành bất kỳ một đối tượng nào trong mô hình DAO đều có thể sinh ra một hoặc nhiều lỗi. Mỗi khi một lỗi xảy ra, VBA tạo một hoặc nhiều đối tượng Error và đưa vào trong tập Errors. Khi một đối tượng trong DAO được thi hành và sinh ra lỗi thì tập hợp Errors hiện tại bị xóa và các đối tượng Error mới được sinh ra tương ứng với lỗi đó được đưa vào trong tập Errors.

3. Workspaces

Định nghĩa một tập hợp các vùng làm việc (đang hoạt động hoặc ẩn) của DBEngine. Có thể khai báo nhiều vùng làm việc một lúc. Khi lần đầu tham chiếu hoặc sử dụng đối tượng Workspace, VBA sẽ tự động tạo Workspace mặc định DBEngine.Workspaces(0). Để tham chiếu đến đối tượng Workspace, bạn sử một trong các cú pháp sau:

DBEngine.Workspaces(0)

DBEngine.Workspaces(“name”)

DBEngine.Workspaces![name]

4. Connections

Chứa các đối tượng Connection hiện tại của đối tượng Workspace. Khi mở một đối tượng Connection mới, nó sẽ tự động được thêm vào tập các Connections của đối tượng Workspace. Khi một đối tượng Connection bị đóng, nó sẽ được loại bỏ khỏi tập các Connections.

Tại thời điểm mở một Connection thì một đối tượng Database tương ứng được tạo ra và thêm vào tập Databases trong cùng một Workspace và ngược lại. Khi đóng một Connection thì đối tượng Database tương ứng với nó bị xóa khỏi tập Databases và ngược lại.

Để tham chiếu đến đối tượng Connection trong tập Connections chứa nó bạn có thể sử dụng một trong các cú pháp sau:

Connections(0)

Connections("name") Connections![name]

5. Databases

Chứa tập các đối tượng Database được mở hoặc tạo ra thuộc 1 đối tượng Workspace. Khi tạo mới hoặc mở một đối tượng Database đã có, VBA tự động nó thêm vào tập Databases. Khi xóa một đối tượng Database, nó cũng bị xóa bỏ khỏi tập Databases.

Có thể tham chiếu đến đối tượng Database trong tập Databases chứa nó bởi một trong các cú pháp sau:

Databases(0)

Databases("name") Databases![name]

Ví dụ: Đoạn mã sau để mở 1 CSDL có tên là DB1.MDB trong thư mục D:DataMdb

Dim db As DAO.Database

Set db = DBEngine.OpenDatabase("D:DataMdbDB1.MDB")

Để mở CSDL hiện tại, có thể dùng lệnh:

Set db = CurrentDB

Đóng CSDL vừa mở bạn dùng lệnh:

db.Close

6. Users

Chứa các đối tượng User trong Workspace hoặc Group. Có thể tham chiếu đến đối tượng User bởi một trong các cú pháp sau:

[workspace | group].Users(0)

[workspace | group].Users("name") [workspace | group].Users![name]

7. Groups

Chứa tập các đối tượng Group của Workspace. Có thể tham chiếu đến đối tượng Group bởi một trong các cú pháp sau:

Groups(0)

Groups("name") Groups![name]

8. Reccordsets

Recordsets chứa tập các đối tượng Recordset. Mỗi đối tượng Recordset chứa tập các bản ghi của một bảng, truy vấn hoặc tập các bản ghi là kết quả của câu lệnh SQL.

Một số thuộc tính, phương thức của đối tượng Recordset

+ AbsolutePosition

Thuộc tính này cho biết vị trí tuyệt đối của bản ghi hiện tại tính từ bản ghi đầu tiên có thứ tự là 0.

+ EOF

Thuộc tính này cho biết con trỏ bản ghi có ở vị trí cuối file hay không. Nếu ở cuối file, giá trị trả về là True, ngược lại là False

+ BOF

Thuộc tính này cho biết con trỏ bản ghi có ở vị trí đầu file hay không. Nếu ở đầu file, giá trị trả về là True, ngược lại là False.

+ RecordCount

Trả về một số nguyên là tổng số bản ghi của có thể truy cập được (access) của Recordset.

+ Fields

Dùng để tham chiếu đến các field trong Recordset Ví dụ: Tham chiếu đến field Hoten

Rec.Fields(“Hoten”).Value

+ OpenRecordset

Tạo một đối tượng Recorset mới và thêm nó và tập hợp Recordsets

+ Move n(n là số nguyên)

Di chuyển con trỏ bản ghi đến bản ghi thứ n trong tập các bản ghi của Recordset

+ MoveFirst, MoveLast, MovePrevious, MoveNext

Theo thứ tự là các phương thức để di chuyển con trỏ bản ghi đến bản ghi đầu tiên, cuối cùng, bản ghi liền trước bản ghi hiện tại, bản ghi liền sau bản ghi hiện tại.

+ AddNew, Update

Để thêm mới một bản ghi vào Recordset

Quá trình thêm mới một bản ghi gồm các thao tác:

 Ra lệnh AddNew

 Gán giá trị cho các field theo cú pháp: rec.Fields(“Tên field”).Value = giá trị

 Ra lệnh Update

Ví dụ: đoạn mã sau sẽ thêm vào trong bảng Course có mô tả dưới đây một bản ghi

Tên field