فشرده کردن data base

[mohamad6]

سلام
طریقه فشرده کردن بانک اطلاعاتی اکسس از طریق کد نویسی چگونه است؟

[Salar Khalilzadeh]

سلام!

برای فشرده کردن جدولی از نوع پارادوکس از تابع زیر استفاده کن.

Procedure ParadoxPack(Table:Ttable);
Var
TBDesc:CRTblDesc;
Hdb:hdbiDb;
TablePath:array[0..dbiMaxPathLen] of char;
begin
FillChar(TBDesc,sizeOf(TBDesc),0);
with TBDesc do begin
strPCopy(szTblName,Table.TableName);
strPCopy(szTblType,szParadox);
bPack:=true;
end;
Table.open;
Hdb:=nil;
Check(dbiGetDirectory(table.DbHandle,true,TablePat h));
Table.Close;
Check(DbiOpenDataBase(nil,'STANDARD',DbiReadWrite,
DbiOpenExcl,nil,0,nil,nil,hDb));
Check(DbiSetDirectory(hdb,TablePath));
Check(dbiDoRestructure(hDb,1,@TBDesc,nil,nil,nil,f alse));
Table.open;
end;
برای فشرده سازه جدول از نوع DBase

DbiPackTable(Table1.DBHandle,Table1.Handle,nil,nil ,true);

موفق باشی :)

[شفیعی]

سلام
برای فشرده سازی بانک اطلاعاتی از نوع اکسس باید چکار کرد و یا چگونه می توان از داخل برنامه اطلاعات فایل اکسس را خالی نمود مثلا بخواهیم برای سال مالی جدید اطلاعات قبلی را به صورت فیزیکی حذف نمود

[vcldeveloper]

خواهشا قبل از ارسال سوال، یک بار در سایت جستجو کنید...
http://www.barnamenevis.org/forum/viewtopic.php?t=9164

[شفیعی]

سلام
1- BATCHMOVE با TABLE کار می کند برای ADO چنین کامپوننتی هست
2- اگر بخواهیم کل اطلاعات موجود در TABLE موجود در یک فایل اکسس را پاک کنیم باید چکار کرد

[vcldeveloper]

- اگر بخواهیم کل اطلاعات موجود در TABLE موجود در یک فایل اکسس را پاک کنیم باید چکار کرد
آقای شفیعی، شما که از کاربران با سابقه هستید...حتما میدونید که نباید در یک تاپیک چند سوال مختلف مطرح بشه :sorry: