您可在 Microsoft® Access® 内或者在其它应用程序中用“自动化”来创建一个新的数据库,或者打开和关闭一现有的数据库。本节介绍的方法通常用于在其它应用程序中使用“自动化”。如果代码正在 Access 中运行,它一般都要处理当前打开的数据库,没必要使用这些方法。
注意 如果正在使用的是其它应用程序,而且只须访问某数据库(表或查询)中的数据,不需要使用象窗体和报表这样的对象,这时可用 ADO 来访问所需的数据。
使用 NewCurrentDatabase 方法可创建新的 .mdb 类型数据库。使用 OpenCurrentDatabase 和 CloseCurrentDatabase 方法可分别打开和关闭现有的 .mdb 型数据库。下面的示例可在任何 Microsoft® Office 应用程序中运行。它可打开 Northwind Traders 示例数据库,并打印 OpenReport 方法中指定的 Product Catalog 报表的一部分:
Sub PrintReport(strCategoryName As String)
Dim acApp As Access.Application
Dim strDBPath As String
Const DB_PATH As String = _
"c:\program files\microsoft office\office\samples\northwind.mdb"
Set acApp = New Access.Application
With acApp
.OpenCurrentDatabase DB_PATH
' 打印 Product Catalog 报表。
.DoCmd.OpenReport "Catalog", acViewNormal, , _
"CategoryName = '" & strCategoryName & "'"
End With
acApp.Quit
Set acApp = Nothing
End Sub
使用 NewAccessProject、OpenAccessProject 或 CreateAccessProject 方法可打开或创建 .adp 类型的数据库。NewAccessProject 方法可创建一个新的 .adp 类型数据库并使它处于活动状态,而 CreateAccessProject 方法只在硬盘上创建一个 .adp 文件。使用 OpenAccessProject 方法可打开一个现有的 .adp 类型数据库,而使用CloseCurrentDatabase 方法可关闭一个 .adp 类型的数据库。
创建新数据库或打开一个数据库后,可用 Application 对象的其它方法来创建新的 Access 对象。例如,可用 CreateForm 和 CreateControl 方法来创建窗体和窗体上的控件。可用 CreateReport 和 CreateReportControl 方法来创建报表和报表上的控件。可用 CreateDataAccessPage 方法来创建数据访问页。若要以编程方式给数据访问页添加控件,必须用脚本或动态 HTML (DHTML) 对象模型来直接处理 HTML。
注意 虽然上述方法可用编程方式来创建数据库和数据库中的对象,但这些方法通常只用在向导和加载项中。通常,要通过 Access 的用户界面中创建数据库及其对象,然后使用通过 Access 或其它 Office 应用程序运行的 Microsoft® Visual Basic® for Applications (VBA) 代码以编程方式处理这些对象。