为什么我用ADO打不开ACCESS 文件???

Stephenwu

如题,本人写了以下ADO句子:

Dim Cnn As ADODB.Connection
  
   Set Cnn = New ADODB.Connection
   Cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
   Cnn.Open "D:\Inventory Management system\System\LocalData\DataLocal.mdb", "Administrator", "197088#"

结果却跳出来:

运行错误:'2147217843'

无法启动应用程序. 工作组信息文件丢失, 或以被其他用户以独占方式打开.

但我未设工作组文件, 也没有人打开. 请帮助, 谢谢!!!

fan0217

用以下代码试试呢！

Dim Cnn As  New ADODB.Connection
  
   Set Cnn = New ADODB.Connection
   Cnn.Provider = "Microsoft.Jet.OLEDB.4.0"
   Cnn.Open "Data Source = D:\Inventory Management system\System\LocalData\DataLocal.mdb"

[此贴子已经被作者于2006-1-11 13:28:14编辑过]

Stephenwu

谢谢!

试了, 还是不行, 同样的错误提示!

很急, 谁能帮帮!!!!

fan0217

把库传上来

注意声明：Dim Cnn As  New ADODB.Connection

[此贴子已经被作者于2006-1-11 13:30:47编辑过]

Stephenwu

Thanks, already done