Re: How to compress Access Database?

Article View: borland.public.cppbuilder.database.ado

Article #4050

Back to borland.public.cppbuilder.database.ado Previous Next

#4050

From: Vassiliev V.V.
Date: Wed, 24 Apr 2002 06:41

37 lines
2012 bytes

Import
Microsoft Jet and Replication Objects 2.6 Library

#include <JRO_TLB.h>
...
void __fastcall TForm1::Button1Click(TObject *Sender)
{
 IJetEngine * JetEngine = NULL;
 CoCreateInstance(CLSID_JetEngine, NULL, CLSCTX_INPROC_SERVER,
IID_IJetEngine,
  (void**) &JetEngine);

 WideString Source = "Provider=Microsoft.Jet.OLEDB.4.0;"
  "Data Source=C:\\Test\\Test.mdb;";
 WideString Dest = "Provider=Microsoft.Jet.OLEDB.4.0;"
  "Data Source=C:\\Test\\Compacted.mdb;";

 JetEngine->CompactDatabase(Source.c_bstr(), Dest.c_bstr());

 JetEngine->Release();
}


You can compact database from one file into another. There should be no
users connected to database.

Regards,
Vassiliev V.V.
http://www.oledbdirect.com

"adward lee" <adward_lee@seed.net.tw> �������/�������� � �������� ���������:
news:3cc4feaf_1@dnews...
> Hi, all
> Does anyone know how to compress Access Database by using ADO component?
> Thanks!
>
>

Technical Details

Message-ID: <3cc656d0_2@dnews>

Path:

arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!supernews.com!newsswitch.lcs.mit.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!xmission!news-out.spamkiller.net!propagator2-maxim!propagator-maxim!news-in.spamkiller.net!news02.tsnz.net!newsfeed01.tsnz.net!newsfeeds.ihug.co.nz!ihug.co.nz!dnews

References: <3cc4feaf_1@dnews>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII
X-Google-Thread: 10698b,82b35e1fa2b46ba6
X-Google-Attributes: gid10698b,public
X-Google-ArrivalTime: 2002-04-23 23:58:03 PST
From: "Vassiliev V.V." <news@vassilievvv.mtu-net.ru>
Newsgroups: borland.public.cppbuilder.database.ado
References: <3cc4feaf_1@dnews>
Subject: Re: How to compress Access Database?
Date: Wed, 24 Apr 2002 10:41:15 +0400
Lines: 39
X-Priority: 3
X-MSMail-Priority: Normal
X-Newsreader: Microsoft Outlook Express 6.00.2600.0000
X-MimeOLE: Produced By Microsoft MimeOLE V6.00.2600.0000
NNTP-Posting-Host: 62.118.132.185
Message-ID: <3cc656d0_2@dnews>
X-Trace: dnews 1019631312 62.118.132.185 (23 Apr 2002 23:55:12 -0700)
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!sn-xit-03!supernews.com!newsswitch.lcs.mit.edu!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!xmission!news-out.spamkiller.net!propagator2-maxim!propagator-maxim!news-in.spamkiller.net!news02.tsnz.net!newsfeed01.tsnz.net!newsfeeds.ihug.co.nz!ihug.co.nz!dnews

Reply to Parent Message