VB用ADO连接ACCESS 2007数据库,求指点

blackieliu 2017-03-14 03:01:26
我用vb连接access数据库,已经添加工程——引用——microsoft activeX data objects 6.0 library
但运行时出现错误:实时错误3706,未找到提供程序,该程序可能未正确安装,哪位大侠能指点一下
代码如下
Private Sub Form_Load()
Dim db As New ADODB.Connection, rs As New ADODB.Recordset 'ADO连接对象和记录集
Dim strSQL As String 'SQL字符串
db.ConnectionString = "provider=microsoft.ace.oledb.12.0;Data source =" & App.Path & "/student.accdb" '数据库连接
db.Open '打开数据库
rs.activeconnection = db
rs.Open "select * from info"
Do While Not rs.EOF '循环输出查询到的结果
Print rs.fields(0); rs.fields(1); rs.fields(2)
rs.MoveNext '记录下移
Loop
rs.Close '关闭记录集
Set rs = Nothing

End Sub
...全文
217 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
blackieliu 2017-03-15
  • 打赏
  • 举报
回复
引用 1 楼 Tiger_Zhao 的回复:
下载安装 Microsoft Access 2010 数据库引擎
已经解决,非常感谢
Tiger_Zhao 2017-03-14
  • 打赏
  • 举报
回复

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧