Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

kompaktowanie+access+BCB

1 view
Skip to first unread message

Szyszka

unread,
Jul 6, 2004, 11:31:14 AM7/6/04
to
Witam

Jak zrobic partycjonowanie (kompaktowanie) w ms access z poziomu BCB. Polaczenie
z baza jest oparte o ADOConnection. Jak by ktos mial jakis przykladzik to bylbym
bardzo wdzieczny. Z gory dzieki.

Pozdrawiam !!!
Szyszka

--
Wysłano z serwisu OnetNiusy: http://niusy.onet.pl

Ips

unread,
Jul 7, 2004, 6:40:00 AM7/7/04
to

"Szyszka" <szyszka4...@o2.pl> wrote in message
news:675b.00000d...@newsgate.onet.pl...

> Witam
>
> Jak zrobic partycjonowanie (kompaktowanie) w ms access z poziomu BCB.
Polaczenie
> z baza jest oparte o ADOConnection. Jak by ktos mial jakis przykladzik to
bylbym
> bardzo wdzieczny. Z gory dzieki.
>
pod VC++ robilem to tak

#import "C:\PROGRAM FILES\COMMON FILES\System\ado\MSJRO.DLL" no_namespace

try
{
IJetEnginePtr jet(__uuidof(JetEngine));
jet->CompactDatabase( "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=d:\\Baza.mdb;Jet OLEDB:Database Password=test",
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=d:\\abbc.mdb;" \
"Jet OLEDB:Engine Type=4;Jet OLEDB:Database Password=test");
}
catch(_com_error &e)
{
::MessageBox(NULL, (LPCTSTR)e.Description( ), "", MB_OK) ;
}

tyle ze baza (plik mdb) musi :
- "nie byc " Read-only
- byc zamknieta ( w sensie nie moze byc do niej zadnego polaczenia, nie moze
byc otwarta w Accessie)

jesli Ci to nie pojdzie to musisz jakos pokombinowac, nie znam BCB wiec
wiecej ie pomoge.

pzdr
Ips


szys...@o2.pl

unread,
Jul 8, 2004, 7:45:53 AM7/8/04
to
Wielkie dzieki Ips
pozdr;
Szyszka
0 new messages