الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

استبدال شاشة من شاشات النظام ؟

بدأه kafi في 27 ديسمبر 2012 · 6 رد · 678 مشاهدة · في قواعد بيانات Microsoft Access
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته

في فاتورة المبيعات التي لدي، عندما يتم ادخال كمية معينة ، يتم فحص تلك الكمية، ففي حال كانت الكمية المدخلة اكبر من الرصيد المتوفر، يتم اظهار شاشة لتنبيه المستثمر الى ذلك.

الامور كلها تعمل مائة بالمئة، ولكـــــــــــــــــــــــــــــن

المشكلة: ان الشاشة التي يتم اظهارها ليست لها روح شاشات البرنامج

تم تصميم شاشة تناسب روح شاشات البرنامج، وتم كتابة الاكواد اللازمة لذلك

 If Me.[No_sale] > x Then

      	DoCmd.OpenForm "Mabiat_Caution_Rased"

        	If Forms![Mabiat_Insert].z = 7 Then
            	Me.No_sale.SetFocus
            	DoCmd.CancelEvent
        	End If

    	'""""""""""""""""""""""""""""""""""""
      	' N = MsgBox(zxc, 276, "ÊäÈíå")
      	' If N = 7 Then
      	'   DoCmd.CancelEvent
      	' End If
 		'"""""""""""""""""""""""""""""

ولكن الضغط على زر لا من اجل العودة الى شاشة المبيعات .... لا ينجح

ارجو تعديل المثال المرفق .. بحيث يحقق الغاية المنشودة، كما هو الحال بالنسبة الى شاشة النظام

والف الف شكر

Q110.rar

post-32358-038857500 1356631958_thumb.jp

post-32358-073673200 1356631962_thumb.jp

المرفقات
1.JPG2.JPG

تم تعديل هذه المشاركة بواسطة kafi في 27 ديسمبر 2012 في 21:17

#2

up

#3

اخي الفاضل

ضع هذا الكود عند حدث اغلاق النموذج Mabiat_Caution_Rased

Private Sub Form_Close()
Forms![Mabiat_Insert]![Mabiat_Insert_Sub].Form![No-sale].SetFocus
End Sub

لا تنسانا من التقييم بارك الله بك

بالتوفيق

post-15367-087183200%201340344597.gif

بعض من المواضيــع الممـيزه

post-15367-027053900%201340345097.gif

#4

شكرا اخت زهرة على اجابتك

قمت كما تفضلت بوضع الكود في شاشة التنبيه على الرصيد...

ضبطت الامور الى حد ما....

حاولت تشغيل المثال... وعند وضع كمية ما... سوف يتم اظهار الرسالة التي تنبيه على ان رصيد المادة غير متوفر... فاذا تم اختيار لا...يعود التركيز على عنصر العدد...ولكن اذا تم الضغط على زر Enter.... لا تعود تظهر رسالة التحذير.... ويتم الانتقال الى خانة السعر.... المفروض الا يتم الانتقال الى خانة السعر.

بينما الامور عند استخدام ال Msgbox لا تكون هكذا.. وتكون مضبوطة مائة بالمائة

وضعت المثالين معا.. واحد باستخدام ال Msgbox... والاخر الذي اريد اصلاحه ليصبح في ادائه مماثل لما هو موجود عند استخدام ال Msgbox

ارجو اصلاح الخلل.... والف الف شكر

Desktop.rar

post-32358-092072500 1356801771_thumb.jp

post-32358-017422800 1356801776_thumb.jp

المرفقات
4.JPG3.JPG

تم تعديل هذه المشاركة بواسطة kafi في 29 ديسمبر 2012 في 20:24

#5

بسم الله الرحمن الرحيم

السلام عليكم

 

اخت زهرة بارك الله فيك

لقد قمت باجراء بعض التعديلات، من اجل المحاولة في جعل نموذج شاشة التحذير يماثل في ادائه ال Msgbox

حيث جعلت فحص الكمية المدخلة في خدث (قبل تحديث السجل) ، ولكن مازال الكود لا يعمل بشكل صحيح، وهو بحاجة الى بعض التعديل

 

تم ارفاق مثالين

احدهما، معتمد على فحص رصيد المادة واظهار التحذير بأن الرصيد غير متوفر باستخدام ال    Msgbox

والثاني يعتمد على فحص رصيد المادة واظهار التحذير بأن الرصيد غير متوفر عن طريق اظهار شاشة من روح شاشات البرنامج

 

ارجو تعديل المثال الثاني بحيث يكون في ادائه من الناحية العملية لا يختلف عما هو موجود باستخدام ال  Msgbox

 

والف الف شكر

Q 110 AA.rar

Q 110-ok-Msgbox.rar

تم تعديل هذه المشاركة بواسطة kafi في 28 يناير 2013 في 01:20

#6

up

#7

Up

مواضيع مشابهة