创建数据库范例

如下代码显示如何通过 Create 方法创建新的 Jet 数据库。

Sub CreateDatabase()

   Dim cat As New ADOX.Catalog

   cat.Create "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=c:\new.mdb"

End Sub

索引页    专业培训与服务: Access中级培训 | Access高级培训 | Access顶级培训 | 软件定制开发 | 通用开 发平台 | Office插件 © by Office中国