VB ACCESS的问题

chen3bing 发布于 2019-07-28 15:45， 2486 次点击

只有本站会员才能查看附件，请登录

Public Cn As New ADODB.Connection

Private Sub Form_Load()

    Cn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Extended properties=Access 14.0;Data Source=" & App.Path & "\Database3.accdb"


    Cn.Open
End Sub
我写了个VB操作ACCESS的小程序，可是运行出错。
请高手指教，谢谢！

7 回复

chen3bing2019-07-28 16:55

Private Sub Form_Load()

Cn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & App.Path & "\Database3.accdb"

Cn.Open
End Sub
我把代码改成这样，没错了，可是数据库打不开。

pt4971592019-08-15 20:20

什么意思数据库打不开？截图有么

chen3bing2019-08-16 08:29

回复 3楼 pt497159

只有本站会员才能查看附件，请登录

是这样的。请多指教！

wufuzhang2019-08-16 09:42

1、你没有显示数据库中的数据，怎么就知道数据库没打开？
2、你没有查询数据（conn.Execute "select * from table1")，怎么可能有数据出来？

chen3bing2019-08-16 10:04

回复 5楼 wufuzhang

谢谢！Database3.accdb没有出来啊

jklqwe1112019-08-17 15:55

Database3.accdb没有出来啊？？？？？？？？？？？？？？？？？？？？？
ado没有任何方法把数据库显示出来，他不提供这个功能，作为使用者也完全不需要这个功能，ado所说的打开数据库，就是连接数据库，要想知道是否连接成功，ado提供了方法，并且很简单，就是检查Cn.State的值

chen3bing2019-08-17 17:53

回复 7楼 jklqwe111

谢谢！