Question

我无法在网上找到任何帮助。

我想创建一个表，如果它还不存在，或者填充一个列表框，如果它存在则填充所述表中存储的内容。到目前为止我所有的都是populate和create table子例程，但到目前为止还不知道如何检查数据库。

谢谢

Answer 1

检查是否存在MSAccess DATABASE 非常简单，因为它只是一个文件。所以使用File.Exists就足够了

假设您的MDB文件是

Dim accessFilePath = "D:\temp\myDatabase.mdb"

If File.Exists(accessFilePath) Then
    ... file exists
End if

当然，获取文件内容（以 TABLES 和 QUERY 表示）是另一回事，需要打开连接并获取SCHEMA信息

Dim cnnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & accessFilePath 

Using con = new OleDbConnection(cnnString)
    con.Open()
    Dim schema = con.GetSchema("Tables")
    For Each row As DataRow in schema.Rows
       Console.WriteLine(row.Field(Of String)("TABLE_NAME"))
    Next
End Using

请参阅how GetSchema works以及可能的参数和结果

[VB.NET] [ACCESS]如何检查数据库是否存在？

1 个答案: