View Full Version : سوال: حذف تمامی رکورد های یک جدول
محمود ایوبی
دوشنبه 30 فروردین 1389, 12:28 عصر
سلام خدمت تمامی دوستان
اگر برای اتصال به دیتابیس از ADO استفاده کرده باشیم و بخواهیم تمامی رکورد های یکی از جداول بانک اطلاعاتی رو پاک کنیم چه کار باید بکنیم ؟
من خودم از DeleteRecords استفاده کردم ولی پیغام خطای زیر رو میده
Operation is not allowed in this context
لطفا راهنمایی کنید.
Felony
دوشنبه 30 فروردین 1389, 12:52 عصر
هم میتونید با دستورات SQL این کار رو بکنید و هم با یک حلقه کل بانک رو کنکاش کنید و با متد Delete رکورد جاری رو حذف کنید .
حسین خانی
دوشنبه 30 فروردین 1389, 15:55 عصر
با سلام :لبخندساده:
procedure TForm1.Button1Click(Sender: TObject);
var
i,n:integer;
begin
n:=ADOQuery1.RecordCount;
for i:=1 to n do
ADOQuery1.Delete;
end;
موفق باشید ...
Mahmood_M
دوشنبه 30 فروردین 1389, 16:53 عصر
با سلام :لبخندساده:
procedure TForm1.Button1Click(Sender: TObject);
var
i,n:integer;
begin
n:=ADOQuery1.RecordCount;
for i:=1 to n do
ADOQuery1.Delete;
end;
موفق باشید ...
قبلش باید جدول رو به ابتدا ببرید :
ADOTable1.First;
به صورت زیر هم میشه :
ADOTable1.First;
While not ADOTable1.Eof do
ADOTable1.Delete;
...
محمود ایوبی
دوشنبه 30 فروردین 1389, 17:51 عصر
ممنونم از تمامی دوستان که پاسخ دادند من مشکلم حل شد.
M aJi D
چهارشنبه 01 اردیبهشت 1389, 01:30 صبح
سلام.
دوست عزيز ميتونيد از دستور sql هم استفاده كنيد كه سرعتش هم بيشتره .
adoquary.sql.text := "Delete * From Table1"
موفق باشيد
vBulletin® v4.2.5, Copyright ©2000-1403, Jelsoft Enterprises Ltd.