#include <utilcls.h>
를 해주세요.
혹시 초보님들이 안된다고 좌절하실까바....
유기형 님이 쓰신 글 :
: 서비 님이 쓰신 글 :
: : MDB 파일이 현재 10MB라고 가정했을때,
: : ADO를 이용해서 데이타의 내용을 모두 삭제해도 용량은 그대로 입니다.
: : MS Access를 이용하여 압축을 했을 경우에는 용량이 줄어듭니다.
: : 데이타를 삭제해도 MDB파일의 용량이 줄어들 수 있는 방법..
: : 어떻게 하면 좋을까요?
:
: 하루 종일 여기 저기 찾아 봤습니다.
: 다음과 같은 방법으로 해서 해결했습니다.
: 다음 사이트에서 방법을 찾았습니다.
: http://borland.xportal.ru/forum/viewtopic.php?t=9585
:
:
: void __fastcall TForm1::Button1Click(TObject *Sender)
: {
: Variant JetEng;
: AnsiString SourceFileName = "YahoAutobi.mdb", TargetFileName="Temp.mdb";
: JetEng = CreateOleObject("JRO.JetEngine");
: WideString InputDB = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + SourceFileName;
: WideString OutputDB = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" + TargetFileName;
: JetEng.OleFunction("CompactDatabase",InputDB,OutputDB);
:
: if (DeleteFile(SourceFileName)== false) ShowMessage("파일을 지울 수 없음");
: if (RenameFile(TargetFileName, SourceFileName) == false)
: ShowMessage("파일이름을 바꿀 수 없음");
: JetEng = Unassigned;
: }
|