حذف سجل عن طريق زر الحذف من لوحة المفاتيح

[النجاشي]

السلام عليكم استاتذي الكرام 

الموضوع  استاتذي الكرام

عندما يكون عندي عده سجلات اريد احذف السجل المحدد عن طريق زر دليت  مع ظهور رساله هل تريد الحذف اولا

عندما اريد اعدل سجل اضغط f2 يستدعي السجل المحدد بالفاتوره الي الفورم[frmEdrajSenf] واعمل ادراج يتعدل السجل

شاكرين لكم احبتي الكرام

8522.rar

[النجاشي]

للرفع

[النجاشي]

للرفع

[الحلبي]

الاخ / ابو زاهر

المرفق به مشكلة ولا يفتح معي ـ لا اعرف 

يرجى اعادة ارفاقه حتي يمكن للاخوة مساعدتك

[النجاشي]

الان, حلبي said:

الاخ / ابو زاهر

المرفق به مشكلة ولا يفتح معي ـ لا اعرف 

يرجى اعادة ارفاقه حتي يمكن للاخوة مساعدتك

الاخ حلبي اعتقد من غندك المشكله  ببرنامج الضغط يحتاج الي تنصيب من جديد  لانه قد حصلت معي من قبل وحذفت برنامج الضغط ونزلت اصدار جديد اشتغل كويس ما قدرت انزل قاعده جديده شكل الموقع فيه خلل فني  بس السوال هل يعطيك رساله اما ماذا 

تم تعديل أكتوبر 5, 2017 بواسطه ابو زاهر

[الحلبي]

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

لو احد الزملاء حمل القاعدة يمكن يدلنا علي ان الخلل من عندي ام من القاعدة

[النجاشي]

الان, حلبي said:

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

لو احد الزملاء حمل القاعدة يمكن يدلنا علي ان الخلل من عندي ام من القاعدة

حاولت انزلت قاعده جديده ما قدرت مادريت شو المشكله هل من عندي ام من المنتدي ولكن ارفقت الصوره توضح المطلوب شاكرين مقدرين 

[الحلبي]

زر الديلت يكون بالنمودج الرئيسي ام في الفرعي

 

[ابوخليل]

السلام عليكم 

انظر الى آخر يسار السجل ، يوجد سهم صغير اسود

اذا اردت حذف السجل  حدد هذا السهم ثم انقر زر Del

 

[النجاشي]

الان, حلبي said:

زر الديلت يكون بالنمودج الرئيسي ام في الفرعي

 

اخي الكريم عفو انا ما بريد زر انما اريد عند الضغط على مفتاح دليت بالكيبورد

واشكرك اخي من كل قلبي

وانا شكله في خلل عندي بالجهاز صار من اليوم ما بقدر ارد من الكمبيوتر وانما من الموبيل فعلا اخي طلع المرفق مظروب نظر اليه استاذنا الكريم ابو خليل فمادريت شو صار مع بالموقع

[الحلبي]

اخي / ابو زاهر

ادا كان الموضوع كده يبقي مثل ما قال استادنا / ابو خليل

اشر الي اول السجل واضغط علي زر دلت بالكيبورد يحدف لك السجل فورا

جرب وان شاء يكون خير

ملاحظة صغيرة جميع المرففات تحمل بدون اي مشاكل اعتقد ان الخلل في الكمبيوتر المستخدم لديك 

[النجاشي]

الان, ابوخليل said:

السلام عليكم 

انظر الى آخر يسار السجل ، يوجد سهم صغير اسود

اذا اردت حذف السجل  حدد هذا السهم ثم انقر زر Del

 

شكر اليك استاذي عملتها حذف بس هل يوجد كود لانه ما بدي استخدم الماوس

فعندما اقف على سجل واضغط دليت من الكيبورد يعطينا رساله  هل تريد الحذف غير رساله الاكسس واذا لم توجد فهي اخر العلاج شاكر اليك استاذنا الغالي الله يعطيك الصحه والعافيه

[ابوخليل]

الرسالة وجودها افضل  

دائما نصنع رسائل التحذير  لاخذ الحيطة

اذا اردت حذف اكثر من سجل بنقرة واحدة  اضغط على السهم الصغير واسحب وانت ضاغط لتحديد اكثر من سجل

[النجاشي]

منذ ساعه, ابوخليل said:

الرسالة وجودها افضل  

دائما نصنع رسائل التحذير  لاخذ الحيطة

اذا اردت حذف اكثر من سجل بنقرة واحدة  اضغط على السهم الصغير واسحب وانت ضاغط لتحديد اكثر من سجل

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

حذف السجل من لوحه المفاتيح.rar

[الحلبي]

والله انا مشفق ومتأسف لك اخي / ابو زاهر

مازال المرفق لا يفتح 

[النجاشي]

3 دقائق مضت, حلبي said:

والله انا مشفق ومتأسف لك اخي / ابو زاهر

مازال المرفق لا يفتح 

هذا من طيب قلبي اخي حلبي انا مادريت شو المشكله ولكن انظر لهذ الرابط عنوانه اخر لكن توجد الفاتوره فيه

انظر عليه

كل المحاولات لك كانك عملته لي علي كل حال الله يرضي عيك كم انت طيب القلب 

فالف شكر اليك اخي 

[ابوخليل]

تفضل 

لحذف السجل  من لوحة المفايح واخفاء تحذير اكسس

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 46 Then
DoCmd.CancelEvent
If MsgBox("سيتم حذف السجل " & vbCrLf & _
    "هل تريد المتابعة ؟؟", _
    vbInformation + vbYesNo, _
    "تحذير") = vbYes Then
DoCmd.SetWarnings False
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
DoCmd.SetWarnings True
Else
Exit Sub
End If
End If
End Sub

 

db2.rar

[النجاشي]

1 ساعه مضت, ابوخليل said:

تفضل 

لحذف السجل  من لوحة المفايح واخفاء تحذير اكسس

Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
If KeyCode = 46 Then
DoCmd.CancelEvent
If MsgBox("سيتم حذف السجل " & vbCrLf & _
    "هل تريد المتابعة ؟؟", _
    vbInformation + vbYesNo, _
    "تحذير") = vbYes Then
DoCmd.SetWarnings False
DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70
DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70
DoCmd.SetWarnings True
Else
Exit Sub
End If
End If
End Sub

 

db2.rar

الحمدالله انحلت مشكلتي

بارك الله فيك استاذنا@ ابوخليل الله يمدك بالعمر المديد ويعطيك الصحه والعافيه

وبارك الله باخونا @حلبي   الله يمدك بالعمر المديد ويعطيك الصحه والعافيه

بذل مجهود لكي يساعدنا  شاكر اليكم استاتذي جميعا 

تم تعديل أكتوبر 6, 2017 بواسطه ابو زاهر