与复本操作有关的对象、属性和方法
为了实现复本燥乍， Microsoft Jet数据库引擎提供了多个对象、属性和方法。在这一节中，将介绍与复本操作有关的对象、属性和方法。
1．Document对象和Documents集合
Document对象含有关于对象的一个实例的信息，对象可以是一个数据库、表、查询或关系（仅用于Microsoft Jet数据库）。
每个Container对象有一个包含Document对象的Documents集合（其关系详见VB的帮助文件），这些Document对象描述由Container指定类型的内置对象的实例。表1 列出了Document所描述的对象的类型、其Container对象的名称及Document包含信息的类型。
Document container 包含的信息
数据库 数据库 保存的数据库
表或查询 表或查询 保存的表或查询
关系 关系 保存的关系
用Document对象可以实现下列操作：
·用Name属性返回由用户或Microsoft Jet数据库引擎在建立对象时给对象所取的名字。
·用Container属性返回包含Document对象的Container对象的名称。
·用Owner属性设置或返回对象的拥有者。为了设置owner属性，用户必须有对Document对象的写权限，并且必须把userName属性设置为一个现有的user或Group对象的名称。
·用UserName属性或Permissions属性设置或返回一个用户或组对象的访问权限。为了设置这些属性，用户必须有对Document对象的写权限，并且必须把userName属性设置为一个现有的User或GrOup对象的名称。
·用DateCreated属性和LasUpdated属性分别返回建立Document对象和最后修改Document对象的日期和时间。
由于一个Document对象对应于一个现有的对象，因此用户不能建立新的Document对象或者删除现有的Document对象。一个Documents集合含有多个Document对象。可以通过以下几种格式引用一个Document对象：
Documents（0）
Documents（"Name”）
Documents！[name]
2．container对象和Containers集合
Contalner对象把相似类型的Document对象放在一个组中。每个Database对象含有由内部container对象组成的Containers集合。应用程序可以定自己的文档类型和相应的容器（仅对Microsoft Jet数据库），但这些对象不一定总是通过DAO支持。某些Container对象由Microsoft Jet数据库引擎定义，也可以由其它应用程序定义。
Container对象 包含的信息
数据库 保存的数据库
表 保存的表及查询
关系 保存的关系
说明：
1.)每个Container对象含有由Document对象组成的Documents集合，通常用Container对象作为到Document对象中信息的直接链接，也可以用container集合为给定类型的Document对象设置安全性。
2.）用Container对象可以实现以下操作：
·用Name属性返回Container对象的预定义名称。
·用Permissions和UserName属性来设置container对象的权限；在Container对象的Documents集合中建立Document对象来继承这些访问权限设置。
·用owner属性设置或返回Container对象的所有者。为了设置Ower属性，必须写入Container对象的权限，并把属性设置为现有user或Group对象的名称。
（3）Container对象是由系统预定的，因此不能建立新的container对象，也不能删除现有的Container对象。
（4）可以通过顺序号或Name属性设置或引用集合中的container对象，例如：
Containers（0）
Containers（”name”）
Containers![Name]
【例】编写程序，列出Tables容器中的Documents集合。
在窗体上画一个命令按钮，然后编写如下的事件过程:
Private Sub Command1_Click()
Dim dbsnorthwind As Database
Dim docloop As Document
Dim prploop As Property
Set dbsnorthwind = OpenDatabase("e:\f.mdb")
With dbsnorthwind.Containers!tables
Debug.Print "documents in " & .Name & "container"
'列出Table容器中的Documents集合
For Each docloop In .Documents
Debug.Print " " & docloop.Name
Next docloop
End with
dbsnorthwind.close
End sub
该过程列出f.mdb数据库Table容器中的Documents集合。程序运行后，单击命令按钮，即可在“立即”窗口中列出该集合。
|
