急求在线等:谁能帮我把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