اريد اضافة زر حذف الكل بيانات في جدول

[sofiane05552]

السلام عليكم 

اريد اضافة زر يمكنه حذف كل بيانات الي بالجدول

 في اكسس مافي  زر يحذف كل بيانات فيه زر  1 فقط يحذف بالحبة

لكن انا  اريد  طريقة عمل  زر  يحذف كل  بيانات 

ارجوا المساعدة اكرمكم الله

هاهي صورة

 المرفق في  اسفل  لتعديل عليه

اسم الفورم الي اريد عمل لها  زر حذف الكل اسمها TblLogInOut

 

login-new resgister entre sortie (2).rar

تم تعديل أغسطس 12, 2017 بواسطه sofiane05552

[Shivan Rekany]

20 دقائق مضت, sofiane05552 said:

لكن انا  اريد  طريقة عمل  زر  يحذف كل  بيانات 

الیک ھذا السطرين يحذف كل سجلات الموجودة

    DoCmd.RunCommand acCmdSelectAllRecords
    DoCmd.RunCommand acCmdDeleteRecord

 

[sofiane05552]

15 دقائق مضت, Shivan Rekany said:

الیک ھذا السطرين يحذف كل سجلات الموجودة

    DoCmd.RunCommand acCmdSelectAllRecords
    DoCmd.RunCommand acCmdDeleteRecord

 

بارك الله فيك ياأستاذ 

جعله الله في  ميزان حسناتك 

استاذ سؤال هل  انشئ زر جديد واروح للخصائص  عند النقر  وانسخ الكود التالي  صح او  انا  مخطئ

[Shivan Rekany]

1 دقيقه مضت, sofiane05552 said:

سؤال هل  انشئ زر جديد واروح للخصائص  عند النقر  وانسخ الكود التالي  صح او  انا  مخطئ

صح اعمل زر جديد وفي محرر فيجوال الصق الكود في حدث عند النقر 
* وايضا هناك طرق اخر لحذف الكل في جدول

[sofiane05552]

الان, Shivan Rekany said:

صح اعمل زر جديد وفي محرر فيجوال الصق الكود في حدث عند النقر 
* وايضا هناك طرق اخر لحذف الكل في جدول

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

[النجاشي]

1 ساعه مضت, Shivan Rekany said:

صح اعمل زر جديد وفي محرر فيجوال الصق الكود في حدث عند النقر 
* وايضا هناك طرق اخر لحذف الكل في جدول

بارك الله فيك أستاذ شفان

[فقير ومشتري الدنيه بضحكتي]

انشا زر حذف  واكتب فيه الكود التالي 

dim s as string 

s="delete* from اسم الجدول " 

docmd.runsql  s

DOCMD.REFRESH   او    DOCMD. REQURY

MSGBOX " تم حذف البيناات من الجدول "