数据库连接问题！高手帮帮我！

Question

我使用的是数据库是ACCESS2003
我的数据库是在本地磁盘里，数据库名为：cp2101
其存放路径为：D:\Program Files\Microsoft Visual Studio\VB98\cp2101.mdb
数据库无密码为什么我执行到 Conn.Open strConn 这句时，报错啊？
是不是连接字符串有问题
我是新手，望各位帮帮我！
Option ExplicitPrivate Rs As New ADODB.Recordset
Private Conn As New ADODB.ConnectionPrivate Sub Form_Load()
 Dim strConn As String
 
 ' 连接数据库的字符串
 ' 连接带密码的数据库,直接在连接符后面加上Jet OLEDB:DataBase Password='您的密码'
 ' 连接Access97数据库需要使用Jet.OLEDB.3.5,Access2K和以上数据库使用Jet.OLEDB.4.0
 strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\cp2101.mdb;Persist Security Info=False"
 
 ' 使用客户端数据游标
 Conn.CursorLocation = adUseClient
 ' 打开Access的连接
 Conn.Open strConn
 
 ' 如果RecordSet的状态不是关闭状态,则关闭Recordset
 If Rs.State <> adStateClosed Then Rs.Close
 
 ' Recordser打开表People
 Rs.Open "Select * from 设备表", Conn, adOpenKeyset, adLockOptimistic
 
 ' 报告出 一共多少笔数据,测试是否存在数据
 ' MsgBox Rs.RecordCount
 
 ' 绑定进DataGrid
 Set DataGrid1.DataSource = Rs
 
End Sub

Answer 1

你可能没在“引用”中选择 “Microsoft.Jet.OLEDB.4.0”协议。

Answer 2

第一次运行报错为：没有注册类型第二次
报错提示为：灾难性故障请问Microsoft.Jet.OLEDB.4.0这协议我的组件里没有啊~~我应该在哪引用？？？

Answer 3

Run Time error'-2147418113(8000ffff)':
灾难性故障我在“工程”-“部件”里没有这个Microsoft.Jet.OLEDB.4.0协议别人说是引用“工程”-“部件”里的Microsoft Activex Data Objects 2.X Library这个组件才能够用ADO连接数据库，我的“工程”-“部件”里也没这个，我是引用的Microsoft ADO Data Control 6.0(OLEDB) 和 Microsoft DataGrid Control6.0(OLEDB)来连接数据库的请各位高手帮帮我，顺便问问，为什么你们说的东东我的机器里都没有啊！我用的是英文版的VB6.0

Answer 4

怎么会没有呢，工程－引用里，找啊
实在找不到就装mdac吧