发帖

【优惠升级】华秋PCB首单最高立减100元，SMT免费贴片！！！

[问答]

请教如何用SQL语句来压缩ACCESS数据库

16132 数据库

问答对人有帮助，内容完整，我也想知道答案 0 通过对ACCESS数据库的“修复与压缩”会使程序的运行更加稳定和提高运行速度。——请教如何用SQL语句来压缩ACCESS数据库，只用SQL语句哟！谢谢！ 2
2014-11-29 21:54:12　　评论淘帖0 邀请回答您可以邀请以下用户，快速回答问题 × jihuahua 该类别下有 142 个回答，其中被选为最佳答案 4 次。邀请回答羊驼啊该类别下有 77 个回答，其中被选为最佳答案 2 次。邀请回答唐少华该类别下有 61 个回答。邀请回答酸牛奶甜该类别下有 55 个回答。邀请回答 btlook 该类别下有 48 个回答。邀请回答 qiujingshui 该类别下有 47 个回答。邀请回答世人皆不同该类别下有 42 个回答。邀请回答 hjc6063209 该类别下有 42 个回答。邀请回答 cc栗子该类别下有 41 个回答。邀请回答 907510265 该类别下有 41 个回答。邀请回答 woshisu 该类别下有 39 个回答。邀请回答留白该类别下有 34 个回答。邀请回答周建远该类别下有 34 个回答，其中被选为最佳答案 87 次。邀请回答哇哈哈哈6 该类别下有 34 个回答。邀请回答志尊宝该类别下有 31 个回答。邀请回答 ww 该类别下有 31 个回答，其中被选为最佳答案 2 次。邀请回答 yingtn 该类别下有 30 个回答。邀请回答 wenT 该类别下有 30 个回答。邀请回答舞出精彩该类别下有 29 个回答。邀请回答阳光1下该类别下有 29 个回答。邀请回答举报罗威威相关推荐 • MySQL数据库Access存储读取SQL语句 3289 • Database数据库SQL语句 2592 • labview通过LabSQL连接Access数据库的错误 5732 • 请问labview如何通过语句连接sql sever数据库？ 2912 • 在LABVIEW中实现对数据库表格的操作 4653 • labview如何访问access数据库 8096 • 使用labsql远程访问sql数据库出现表名无效问题，是什么原因 6274 • labview如何远程访问数据库 2950 • 本地LabVIEW访问远程mysql 13488 • labview数据库清空压缩问题 3529 14个回答

答案对人有帮助，有参考价值 0 SQL 是对数据库表（包括查询）的操作；“修复与压缩”是对数据库文件的操作。所以不知道用SQL是否能达到“修复与压缩”的目的。

2014-11-30 08:07:58 评论举报 Jack

答案对人有帮助，有参考价值 0 如果要通过编程实现 “修复与压缩” 的功能可以用 CompactDatabase 方法： - DAO :: DBEngine.CompactDatabase - JRO :: CompactDatabase

2014-11-30 08:18:11 评论举报 Jack

答案对人有帮助，有参考价值 0 百度搜一下一大把

2014-11-30 12:01:27 评论举报 h1654155743.3565

答案对人有帮助，有参考价值 0 Jack315 发表于 2014-11-30 08:18 如果要通过编程实现 “修复与压缩” 的功能可以用 CompactDatabase 方法： - DAO :: DBEngine.CompactDatab ... CompactDatabase 方法：这个怎么使用，谢谢

2014-11-30 16:00:06 评论举报罗威威

答案对人有帮助，有参考价值 2 本帖最后由 Jack315 于 2014-11-30 18:06 编辑 luo_wei 发表于 2014-11-30 16:00 CompactDatabase 方法：这个怎么使用，谢谢假设编程环境为 Access VBA。首先要引用相应的库，比如 Microsoft Jet and Replication Object 2.6 Library。下面这段代码片段演示 CompactDatabase 的使用方法： Private Sub CompactDBFile() ' 压缩数据库文件 Const cstrTemporaryFileName = "Temporary.mdb" Dim jroJE As New JRO.JetEngine Dim strSourceFile As String Dim strDestinationFile As String ' 如果数据库文件之前已打开连接，则关闭该数据库文件的连接 If mconData.State <> adStateClosed Then CloseConnection ' mstrFileName 含有欲操作的数据库文件名 strDestinationFile = GetDatabankDirectory & mstrFileName If Dir(strDestinationFile) <> "" Then ' 确保临时文件不存在 strSourceFile = GetDatabankDirectory & cstrTemporaryFileName If Dir(strSourceFile) <> "" Then Kill strSourceFile ' 将欲压缩文件改名为临时文件 Name strDestinationFile As strSourceFile ' 压缩临时文件 jroJE.CompactDatabase cstrConnection & strSourceFile & ";", cstrConnection & strDestinationFile & ";" ’ 删除临时文件 Kill strSourceFile End If End Sub 复制代码另外，LZ也可以参考 Access VBA 中关于 CompactDatabase 方法的帮助：

2014-11-30 18:00:11 1 评论举报 Jack 1 条评论罗威威 2014-11-30 21:59 厉害赞回复举报

答案对人有帮助，有参考价值 0 谢谢，表示一片凌乱。现在有没有语句可以彻底删除数据？

2014-11-30 22:01:25 评论举报罗威威

答案对人有帮助，有参考价值 0 记得有个“边学边干数据库”，里面有将压缩数据库，不知道是不是你想要的

2016-11-28 10:37:16 评论举报颜培玲

答案对人有帮助，有参考价值 0 11111111xgcb 发表于 2016-11-28 10:37 记得有个“边学边干数据库”，里面有将压缩数据库，不知道是不是你想要的谢谢，问题已解决，仍然表示感谢

2016-11-28 20:55:19 评论举报罗威威

答案对人有帮助，有参考价值 0 请问是怎么解决的啊？我用Compact database方法，SourceConnection和Destconnection不知道要怎么填

2017-5-27 10:23:01 评论举报是聪明

答案对人有帮助，有参考价值 0 shiqiaoqiao 发表于 2017-5-27 10:23 请问是怎么解决的啊？我用Compact database方法，SourceConnection和Destconnection不知道要怎么填其实6层有详细的资料，你能找到方法的，祝你好运。这个具体我也不记得有没用LabVIEW试过，反正现在忘了这个方法了

2017-5-29 23:55:51 评论举报罗威威

答案对人有帮助，有参考价值 0 菜鸟来了，多多指教

2017-5-30 10:13:40 评论举报毛军

答案对人有帮助，有参考价值 0 luo_wei 发表于 2017-5-29 23:55 其实6层有详细的资料，你能找到方法的，祝你好运。这个具体我也不记得有没用LabVIEW试过，反正现在忘了这个方法了好的，我再研究下，多谢

2017-5-31 09:25:40 评论举报是聪明

好像可以了，贴个图给后来人参考，我用的不是JRO中的compact database,用的是Microsoft 0ffice 12.0 access database中的DAO.B Engine 方法

1.png (16.18 KB, 下载次数: 7)

评分

参与人数 1	积分 +3	收起理由
luo_wei	+ 3	您的付出是william hill官网的动力,感谢您一直支持!.

查看全部评分

2017-5-31 12:18:13 1 评论

1 条评论

Grayq
2021-10-21 15:09
DB compact.vi中的没有注册类
报错了

赞回复举报

答案对人有帮助，有参考价值 0 shiqiaoqiao 发表于 2017-5-31 12:18 好像可以了，贴个图给后来人参考，我用的不是JRO中的compact database,用的是Microsoft 0ffice 12.0 access database中的DAO.B Engine 方法我试试了,不行啊,,能发个源码不,多谢

2018-5-14 16:10:45 评论举报 3708407

撰写答案

你正在撰写答案

如果你是对答案或其他答案精选点评或询问，请使用“评论”功能。

声明：本文内容及配图由入驻作者撰写或者入驻合作网站授权转载。文章观点仅代表作者本人，不代表电子发烧友网立场。文章及其配图仅供工程师学习之用，如有内容图片侵权或者其他问题，请联系本站作侵删。侵权投诉

我要提问

精选推荐

labview怎样实现成绩图录入程序图，还要显示信息

1281 浏览 1 评论
labview打包可执行文件后安装出错

1721 浏览 2 评论
NI Vision有个图片打不开其他图都能打开（用NI Vision Assistant也打开不了）

2129 浏览 1 评论
labview2015使用Excel报表程序打包生成后打开程序要选一个vi才能使用，否则软件就会报错，这是什么问题？

2675 浏览 2 评论
LabVIEW与单片机无法串口通信提示串口打开错误端口设置有问题吗？

2606 浏览 3 评论

快速回复 返回顶部 返回列表

关注微信公众号

电子发烧友网

电子发烧友william hill官网

社区合作: 刘勇; 联系电话：15994832713; 邮箱地址：liuyong@huaqiu.com

社区管理: elecfans短短; 微信：elecfans_666; 邮箱：users@huaqiu.com

【优惠升级】华秋PCB首单最高立减100元，SMT免费贴片！！！

返回 LabVIEWwilliam hill官网

回复

关闭

站长推荐 /5

快速回复 返回顶部 返回列表

- 技术社区: HarmonyOS技术社区

RISC-V MCU技术社区

FPGA开发者技术社区

KaihongOS技术社区

- OpenHarmony开源社区: OpenHarmony开源社区

- 嵌入式william hill官网: ARM技术william hill官网

STM32/STM8技术william hill官网

嵌入式技术william hill官网

单片机/MCUwilliam hill官网

RISC-V技术william hill官网

瑞芯微Rockchip开发者社区

FPGA|CPLD|ASICwilliam hill官网

DSPwilliam hill官网

- 威廉希尔官方网站图及DIY: 威廉希尔官方网站设计william hill官网

DIY及创意

电子元器件william hill官网

专家问答

- 电源技术william hill官网: 电源技术william hill官网

无线充电技术

- 综合技术与应用: 机器人william hill官网

USBwilliam hill官网

电机控制

模拟技术

音视频技术

综合技术交流

上位机软件（C/Python/Java等）

- 无线通信william hill官网: WIFI技术

蓝牙技术

天线|RF射频|微波|雷达技术

- EDA设计william hill官网: PCB设计william hill官网

DigiPCBAwilliam hill官网

Protel|AD|DXPwilliam hill官网

PADS技术william hill官网

Allegrowilliam hill官网

multisimwilliam hill官网

proteuswilliam hill官网 |仿真william hill官网

KiCad EDA 中文william hill官网

DFM|可制造性设计william hill官网

- 测试测量william hill官网: LabVIEWwilliam hill官网

Matlabwilliam hill官网

测试测量技术

传感技术

- 招聘/交友/外包/交易/杂谈: 项目外包

供需及二手交易

工程师杂谈|交友

招聘|求职|工程师职场

- 官方社区: 发烧友官方/活动

华秋商城

华秋威廉希尔官方网站

time

recommend

hot

post

—
—
—

版
块
导
航