急求在线等：谁能帮我把VB和Access连接起来？Access和vb界面都有就是不会连接

来源：百度知道 编辑：UC知道 时间：2024/06/16 06:34:55
谁能帮我把VB和Access连接起来？Access和vb界面都有就是不会连接，我会拿出200分的，愿意者留言，我会立刻联系，只有一天时间了！！！
我的意思是，我现在有代码就是不知道怎么把vb和access连起来，还有这个应该是写在哪儿的？

Global 数据库A As New ADODB.Connection '声明新建数据库
Global 数据集合A As New ADODB.Recordset '新建数据集合
Global sql As String '声明SQL 变量

数据库A.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & _
"\yxdt.mdb;Persist Security Info=False;" 'Jet OLEDB:Database Password=fttl_398"

以上是我自己程序的代码部分
尽量写在load或者Main里
不懂可以问我 q21979018

在窗体中加入一个Adodc空件名为Adodc1，用于链接access数据库文件；一个DataGrid1空件，用于显示表中数据，在工程-部件中加入。
'假设access数据库文件shujuku.mdb在当前文件夹内，里边有表biao1，在窗体初始化链接数据文件
Private Sub Form_Load()
'链接带密码的access数据库
'Cnnt = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\shujuku.mdb;Jet OLEDB:Database Password=mima;yonghuming,mima"

'链接没密码的access数据文件
Cnnt = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + App.Path + "\shujuku.mdb"
Adodc1.ConnectionString = Cnnt
Adod