如何连接到数据库应用程序路径 - vb6

Question

我正在尝试连接我的数据库（不是 binded/flexible），当表单激活时它将运行。但是在我的代码中它一直出错并且没有连接到数据库。这是我的最后一个代码：

Private Sub LoginForm_Activate()
    Aadodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Database\Login.mdb;Persist Security Info=False"
    Aadodc2.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\Database\login.mdb;Persist Security Info=False"
End Sub

我曾经通过 adodc 属性连接过它。但是在我运行之后，如果我将文件夹移动到另一个文件夹，它就会崩溃，所以我尝试使用灵活的连接字符串来连接它。

Answer 1

我找到了，应该刷新 adoc Aadodc1.Refresh 并且必须定义记录源 Aadodc1.RecordSource = "Select * from [table name]"。就这样:)

如何连接到数据库应用程序路径 - vb6

How to connect to Database app path - vb6

vb6