Vb连接Access问题

Question

Run-time error '-2147467259(80004005)':
数据库被用户'Admin'使用计算机'计算机'置为锁定或不能打开的状态有两个程序，一个读，一个写。运行时有时出现。

Answer 1

Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordsetcnn = "Provider=microsoft.jet.oledb.4.0;data source=" & App.Path & "\RealTime.mdb;"
strDBName = App.Path & "\RealTime.mdb"
If cnn.State = ADODB.adStateClosed Then cnn.Open出错在cnn.Open

Answer 2

把連接字符改一下試試iConcstr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.path & "\data.mdb;Persist Security Info=False;Jet OLEDB:DataBase Password='123'"---------
www.vicmiao.com
努力就有美好時光！