用这段程序压缩数据库出现了下面的错误提示,下面是什么意思呀,请指教一下。
Dim jro As jro.JetEngine
Set jro = New jro.JetEngine
Dim strS as String
dim strT as String
strS="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\nwind2.mdb"
strT="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\abbc2.mdb;Jet OLEDB:Engine Type=4"
jro.CompactDatabase strS,strT
'第一个参数是源文件,第二个是目的文件,另外,请注意type的版本1、出现错误提示(不能执行这项操作;在低版本的数据库中该版本的特性不可用。)是因为版本号与你的数据库格式不符,请看下面的对照表引擎版本号
Jet OLEDB:Engine Type -> Jet x.x Format MDB Files
1 -> JET10
2 -> JET11
3 -> JET2X
4 -> JET3X
5 -> JET4X
Dim jro As jro.JetEngine
Set jro = New jro.JetEngine
Dim strS as String
dim strT as String
strS="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\nwind2.mdb"
strT="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\abbc2.mdb;Jet OLEDB:Engine Type=4"
jro.CompactDatabase strS,strT
'第一个参数是源文件,第二个是目的文件,另外,请注意type的版本1、出现错误提示(不能执行这项操作;在低版本的数据库中该版本的特性不可用。)是因为版本号与你的数据库格式不符,请看下面的对照表引擎版本号
Jet OLEDB:Engine Type -> Jet x.x Format MDB Files
1 -> JET10
2 -> JET11
3 -> JET2X
4 -> JET3X
5 -> JET4X
解决方案 »
- 送分100分:在VB6中如何用代码生成ACESS2003表中的各种类型的字段。
- 如何将commondialog选择的路径给adodc控件的Data Source?
- 呵呵,VB基础书已经买来,麻烦各位给个参考意见^_^
- 用shell打开程序后如何关闭?
- filelist 控件?
- 如何使MsFlexGrid控件的某一列的文本居中对齐,新手的问题!
- 可不可以操作网站的数据库
- 誰幫我看看這個帖子
- 急,请各位帮忙,如何连接安装在Unix上的IBM 的DB2 数据库?
- 请版主(acptvb)回答“用VB能改变本机的IP地址吗?”,谢谢!
- 在command_click中设置datafield怎么不生效?
- 难道做件好事真就这么难吗?郁闷哪.....
5代表jet4,access2000