لو سمحتوا سؤال عن برمجية تنظيف قاعدة لبيانات من كل السجلات بكبسة زر

اقتباس

بس أرغب بوضع أمر ينظف القاعدة ككل بعد الإنتهاء منها وعدم الرغبة في إستبقاء البيانات

غير طريقة حذف السجلات واحد تلو الآخر لأني عملتها

استخدم الحلقات في ذلك

و هذا مثال

With Data1
If Not .Recordset.BOF Then .Recordset.MoveFirst
Do Until .Recordset.EOF
.Recordset.Delete
.Refresh
.Recordset.MoveNext
Loop
End With

أخي الكريم وضح ما تريد بالضبط

تريد إلغاء جميع السجلات من جدول

أم تريد حذف جميع الجداول

إذا أردت حذف جميع السجلات بسطر واحد

D.EXECUTE "DELETE * FROM TABLENAME"

أرغب بحذف بيانات السجلات

بعد إنتهاء العام العام الدراسي وبداية مجموعة جديدة بالعمل على القاعدة المبنية بنفس الحقول

وشكراً

ألف شكر أخي comfortعلى هذه البرمجية إلي عجزت وأنا أبحث عنها

إشتغلت ونظفت القاعدة بكبسة زر الله يجزاك ألف خير

ولو تعرفلي طريقة أعرض فيها بيانات الجدول بأسماء حقول عربية من نفس فورم إدخال البيانات

بغرض المقارنة بين السجلات أو طباعتها أكون لك من الشاكرين

وأسفة على الإزعاج

استخدمي الاقواس المعكوفة

select * from [أسماء الطالبات]

من فضلك

إش قصدك بأسماء الطالبات

إسم الجدول ولا قاعدة البيانات ولا إسم حقل ولا سجل

أنا حطيت إسم الجدول

بعدين بتطلع رسالة خطاء معترض على حالة *

أرجو التوضيح

وأسفة مرة أخرى على إزعاجكم

السلام عليكم ..

نفظلي اختي هدا كود ثاني ..

'was coded by err0r_c0de

'err0r_c0des@yahoo.com

On Error Resume Next
With Data1.Recordset
.MoveFirst
Do While Not .EOF
 .Delete
 .MoveFirst
 Loop
End With

والسلام عليكم

برمجية حذف أخرى رائعة

الله يزيدكم من علم الدنيا والاخرة

بس ياريت برمجية فتح الجدول للمقارنة بين السجلات وطباعتها

وألف شكر

يمكنك إستخدام عبارات sql بالطريقة التالية

data1.execute " delete * from [table_name] "

حيث table_name هو اسم الجدول

أنت لازم تتعلمي لغة SQL هي سهلة جداً من خلالها تستطيعن أن تعرضي السجلات وتقارني بينها .

لنفرض أن هناك جدول اسمه "Table1" خلاص وأنه يحتوي على الحقول التالية :

الإسم ، الفصل ، العمر

وأنا أردت أن أفتح هذا الجدول وأعرض الأولاد الذين أعمارهم فوق الـ 15 سنة فإني استخدم

الجملة الإستعلامية التالية

SQL = " Select * from [Table1] Where [العمر[>15;"