请问用ADO怎么样对access数据库进行压缩,最好提供源代码,谢谢!

chengbhz 2003-03-09 05:40:45
如有效即给分,在线等待,请不要提供DAO的压缩例子
...全文
27 3 打赏 收藏 转发到动态 举报
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
chengbhz 2003-03-09
  • 打赏
  • 举报
回复
真的谢谢你呀,分数全给你。有问题的时候还请你多多指教,我在做一个销售程序,副业来的。所以会有出现很多问题的!
Girl1983 2003-03-09
  • 打赏
  • 举报
回复
需要引用JRO,即:
工程-》引用-》Microsoft Jet and Replaction Object 2.1
Girl1983 2003-03-09
  • 打赏
  • 举报
回复
Dim JRO3 As JRO.JetEngine
Set JRO3 = New JRO.JetEngine
JRO3.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=7281322;Data Source=" & App.Path & "\db1.mdb", _
"Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=7281322;Data Source=" & App.Path & "\db3.mdb"
Kill App.Path & "\db1.mdb"
Name App.Path & "\db3.mdb" As App.Path & "\db1.mdb"

1,216

社区成员

发帖
与我相关
我的任务
社区描述
VB 数据库(包含打印,安装,报表)
社区管理员
  • 数据库(包含打印,安装,报表)社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧