vb.net - 如何以编程方式生成新的 MS 访问文件

Question

我在互联网最深最黑暗的角落里四处张望，但对于我的生活，我找不到正确的方法来打开一个新的 Access 文件，然后使用 vb.net 将数据写入数据库..

这里的关键字是新数据库，我不想打开现有文件。

这甚至可能吗？

提前致谢！

Answer 1

终于找到路了，多亏了我的一个同事

ADO.NET 和 ActiveX 数据对象 (ADO) 都没有提供创建 Microsoft Access 数据库的方法。但是，我们可以使用 Microsoft Jet OLE DB Provider 和 Microsoft ADO Ext 创建 Access 数据库。2.7 用于具有 COM 互操作层的 DDL 和安全性 (ADOX)。为此，从项目菜单中选择引用，选择 COM 选项卡，然后添加对 Microsoft ADO Ext 的引用。2.7 用于 DDL 和安全性；那么你就可以使用这个功能了。

完成此操作后，使用以下代码段创建数据库

---

Public Class Form1

    Private Sub btnLoad_Click(ByVal sender As System.Object, _
                              ByVal e As System.EventArgs) _
                              Handles btnLoad.Click

        CreateAccessDatabase("C:\test\testDB.mdb")
        MsgBox("Database created")
    End Sub

---

    Public Function CreateAccessDatabase( ByVal DatabaseFullPath As String) As Boolean
        Dim bAns As Boolean
        Dim cat As New ADOX.Catalog()
        Try

            Dim sCreateString As String
            sCreateString =_ 
                           "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
                           DatabaseFullPath
            cat.Create(sCreateString)

             bAns = True

        Catch Excep As System.Runtime.InteropServices.COMException
             bAns = False

        Finally
            cat = Nothing
        End Try
        Return bAns
    End Function
End Class

---