创建数据库范例

如下代码显示如何通过 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

End Channel Nav

CodeCoke 代码课 .com

{Tech-ADO程序员参考

>分享Web编程乐趣