ACCESS数据库存储大批量采集信息的问题

发表于:2014-12-24 10:42  作者:快乐鹦鹉   来源:51Testing软件测试网采编

字体: | 上一篇 | 下一篇 |我要投稿 | 推荐标签: 软件开发 数据库

  由于工作需要,使用ACCESS数据库存储港口周围AIS设备接收到的船舶数据。由于在全国很多港口有采集点,因此,数据量很大,每三分钟存储一次数据的话,那么一次将有2000多新的船位数据。这些数据入库后,数据库文件大小将新增1M到2M左右。根据这个频率,一个小时数据库文件将增加40M,一天就是960M。
  为了提高数据库效率,我对数据库中存储的船舶数据进行定时删除,最多保留30万条记录。但是ACCESS中执行delete后,并没有在空间上减少,而只是减少了表中的数据量,这样,就达不到数据库文件变小的要求。
  为了解决这个问题,从网上找到了通过写代码实现数据库文件压缩的代码。通过压缩可以释放delete后占用的空间。
  实际的代码如下:
============================================
BOOL CPetrelProView::CompactDatabase()
{
WriteLog("===开始数据库压缩===","COMPDB");
//::CoInitialize(NULL);
CString sDBFilePathName = GetModulePath() + "ShipSurvey.mdb";//数据库文件
CString sDstDBFilePathName = GetModulePath() + "ShipSurvey_back.mdb";//临时文件
try
{
::DeleteFile(sDstDBFilePathName);//删除已有的临时文件
CFile::Rename(sDBFilePathName,sDstDBFilePathName);//将当前库文件改名为临时文件
}
catch(...)
{
WriteLog("文件改名失败。","COMPDB");
return FALSE;
}
IJetEnginePtr jet(__uuidof(JetEngine));
BOOL bOK = TRUE;
try
{
//压缩临时文件为当前文件
CString sSrc;
sSrc.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Jet OLEDB:Database Password=",sDstDBFilePathName);
CString sDst;
sDst.Format("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;Jet OLEDB:Engine Type=5;Jet OLEDB:Database Password=",sDBFilePathName);
long lResult = jet->CompactDatabase(_bstr_t(sSrc),_bstr_t(sDst));
jet.Release();
//::CoUninitialize();
if(lResult == S_OK)
{
WriteLog("数据库压缩完成。","COMPDB");
WIN32_FILE_ATTRIBUTE_DATA fad;
GetFileAttributesEx(sDBFilePathName,GetFileExInfoStandard,&fad);
CString sDBSize;
sDBSize.Format("压缩后数据库大小:%.1fM",fad.nFileSizeLow/1048576.0);
WriteLog(sDBSize,"COMPDB");
}
else
{
WriteLog("数据库压缩失败。","COMPDB");
CFile::Rename(sDstDBFilePathName,sDBFilePathName);//将临时文件改名为当前库文件
bOK = FALSE;
}
}
catch(_com_error &e)
{
//::CoUninitialize();
WriteLog((LPCTSTR)e.Description(),"COMPDB");
WriteLog("数据库压缩异常。","COMPDB");
CFile::Rename(sDstDBFilePathName,sDBFilePathName);//将临时文件改名为当前库文件
bOK = FALSE;
}
catch(...)
{
WriteLog("数据库压缩异常。","COMPDB");
CFile::Rename(sDstDBFilePathName,sDBFilePathName);//将临时文件改名为当前库文件
bOK = FALSE;
}
WriteLog("===完成数据库压缩===","COMPDB");
return bOK;
}
========================================================
  由于数据库文件压缩必须将文件压缩成备份文件,不能对一个文件直接压缩。因此先将需要压缩的文件改名,然后压缩成原文件名。这样,一个500M左右的数据库文件,只需要几秒钟就可以压缩完成了。
  但是当数据库文件压缩完成后,再次连接数据库进行数据插入等操作后,数据库文件将急速增大。这个过程应该是数据库在恢复一些之前被压缩掉的库辅助信息,如果打开VC工程会产生一些辅助文件一样。

【福利】填问卷 送2019精选测试大礼包+接口测试实战课程!

评 论

论坛新帖

顶部 底部


建议使用IE 6.0以上浏览器,800×600以上分辨率,法律顾问:上海瀛东律师事务所 张楠律师
版权所有 上海博为峰软件技术股份有限公司 Copyright©51testing.com 2003-2019, 沪ICP备05003035号
投诉及意见反馈:webmaster@51testing.com; 业务联系:service@51testing.com 021-64471599-8017

沪公网安备 31010102002173号

51Testing官方微信

51Testing官方微博

扫一扫 测试知识全知道