PDA

View Full Version : سوال: پاک کردن تمام رکورد های یک جدول ado بدون استفاده از sql



u.2u.4u
سه شنبه 20 مهر 1389, 18:03 عصر
سلام می خواستم بدون با چه دستوری می شه تمام رکوردهای یک جدول را بدون استفاده از دستورات sql پاک کرد و البته برای اینکه این دستور خطاهایی مثل خطای جدول خالی و سایر خطا ها را نده لطفا دستورات قبل و بعدش را هم بگید. ممنون میشم

حسین خانی
سه شنبه 20 مهر 1389, 19:08 عصر
با سلام :لبخندساده:

procedure TForm1.Button1Click(Sender: TObject);
var
i,n:integer;
begin
n:=ADOQuery1.RecordCount;
for i:=1 to n do
ADOQuery1.Delete;
end;

به این تاپیک (http://barnamenevis.org/forum/showthread.php?t=215579) هم مراجعه نمائید .

موفق باشید ...

u.2u.4u
سه شنبه 20 مهر 1389, 22:32 عصر
درسته که نباید متنی تشکر کنیم ولی دلم نیومد از همه دوستانی که اینقدر سریع و کامل جواب می دهند من جمله شما دوست عزیزم تشکر نکنم.
یه سوال مهم اینه که چرا متد DeleteRecords جواب نمی دهد؟

hossein_h62
چهارشنبه 21 مهر 1389, 08:21 صبح
سلام دوست عزیز
برای حذف رکوردها از کدی که جناب آقای خانی دادن استفاده کنید.
در ضمن دستور DeleteRecords باید بنا به خواستتون پارامتردهی بشه، به این شکل :




arCurrent > Only the deletes the current record.
arFiltered > Only deletes records accessible through the current filter.
arAll > Deletes all records in the recordset.
arAllChapters > Deletes records in all chapters (ADO chapters)


مثلا برای حذف رکورد جاری :





adoquery1.DeleteRecords(arCurrent);

golbafan
پنج شنبه 29 مهر 1389, 23:42 عصر
درسته که نباید متنی تشکر کنیم ولی دلم نیومد از همه دوستانی که اینقدر سریع و کامل جواب می دهند من جمله شما دوست عزیزم تشکر نکنم.
یه سوال مهم اینه که چرا متد DeleteRecords جواب نمی دهد؟

متد DeleteRecords بعضی از دیتابیس ها مثل اکسس رو ساپورت نمیکنه
برای اینکه ببینید ساپورت میکنه یا نه باید از دستور زیر استفاده کنید

function Supports(CursorOptions: TCursorOptions): Boolean