工程中引用该库:
ado2.1-ado2.6
Microsoft Jet and Replication Objects 2.6Library
代码如下:
Dim JRO As JRO.JetEngine
Set JRO = New JRO.JetEngine
JRO.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db\" & soFile & ".mdb; UID=admin; PWD=Admin;", _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db\" & soFile & "_bak.mdb; Jet OLEDB:Engine Type=4;"
但运行到上面压缩数据库语句时便报如下错误:
Run-time error '-2147467259(80004005)':
找不到可安装的ISAM
如果去掉错误捕获语句,结果显示错误为:这种方法不能应用于低版本数据库。可OLEDB4.0就是对应access2000的阿。
上述语句对access97数据库没问题。
那位知道原因???
ado2.1-ado2.6
Microsoft Jet and Replication Objects 2.6Library
代码如下:
Dim JRO As JRO.JetEngine
Set JRO = New JRO.JetEngine
JRO.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db\" & soFile & ".mdb; UID=admin; PWD=Admin;", _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "\db\" & soFile & "_bak.mdb; Jet OLEDB:Engine Type=4;"
但运行到上面压缩数据库语句时便报如下错误:
Run-time error '-2147467259(80004005)':
找不到可安装的ISAM
如果去掉错误捕获语句,结果显示错误为:这种方法不能应用于低版本数据库。可OLEDB4.0就是对应access2000的阿。
上述语句对access97数据库没问题。
那位知道原因???
1 = Jet 1.0
2 = Jet 1.1
3 = Jet 2.x
4 = Jet 3.x,
5 = Jet 4.x
Jet OLEDB:Engine Type=4;去掉,应该可以了