جعل رسالة الاكسس msgbox بدون زر وتختفي بعد ثواني

[momen268268]

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

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

 

استفساري عن اني اريد عند اظهار رسالة الاكسس بعد عدم تحقق الشرط تكون بدون زر موافق فقط تظهر وتختفي بعد وقت احدده انا وبحثت كثيرا فى الانترنت ولم اجد ضالتي فهل أكد من يساعدني في ضالتي

 

وشكرا

[بحار الاكسس]

MsgBox Prompt:="Deleted", Buttons:=vbOKOnly, Title:="     "

تم تعديل فبراير 19, 2019 بواسطه بحار الاكسس

[momen268268]

مشكور على اهتمامك ولكن الرساله لا تختفي من تلقائ نفسها فهي تظهر لي مربع موافق ويجب علي اختيار موافق بالماوس او بالكيبور بيدي

فالمطلوب هو ان تظهر الرساله وتختفي بعد مثلا 5 ثواني أو 10 ثواني ايا كان الوقت التي تظهر وتختفي فيه الرساله

 

بارك الله فيك

[ابوآمنة]

دعنا نفكر خارج الصندوق 

قم  بإنشاء نموذج وضع فيه رسالتك في حدث الوقت في نموذج الرسالة 10 ثواني يتم الإغلاق

[زياد الحسناوي]

1 ساعه مضت, momen268268 said:

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

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

 

استفساري عن اني اريد عند اظهار رسالة الاكسس بعد عدم تحقق الشرط تكون بدون زر موافق فقط تظهر وتختفي بعد وقت احدده انا وبحثت كثيرا فى الانترنت ولم اجد ضالتي فهل أكد من يساعدني في ضالتي

 

وشكرا

تماما كما وضح الامر اخي @saleh204

فلا توجد طريقة اخرى غير الفورم الزمني 

[momen268268]

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

هبسطها لحضرتك .... بص معايه على الكود ده

Private Sub id_BeforeUpdate(Cancel As Integer)

If Not IsNull(DLookup("[id]", "Table2", "[id2] ='" & Me.id & "'")) Then
MsgBox "'طلبك قيد التنفيذ برجاء الانتظار"
Cancel = True
Exit Sub
End If
DoCmd.SetWarnings False
stDocName = "Query1"
    DoCmd.OpenQuery stDocName, acNormal, acEdit

End Sub

شرح بسيط ،،،

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

المشكله في ان الشاشه اللي بتعرض مفيهاش لا ماوس ولا كيبورد ولا اي شيء غير قارئ باركود فلازم الرساله دي تخرج وتختفي في خلال مثلا خمسة أو عشرة ثواني عشان يشوفها وان طلبه بالفعل قيد التنفيذ 

 

ارجوا اني عرفت اوصل الموضوع

 

وجزاكم الله خير

[بحار الاكسس]

message_bakar_el_access.accdbوجدوتها 

 

والله يوجد مشكلف فى رفع الملغ معا انه اقل من 200 kb

[momen268268]

فعلا مش بيحمل 

ممكن ترفعهولي 2003 ده بعد اذنك

[بحار الاكسس]

قد ارسلت الحل على الاميل تبع حضرتك

وقد ارسلت الى ادارة المنتدى ونص الرسالة 

" السلام عليكم استاذ احمد لماذ الملفات تبعي لا ترفع معا انها اقل من 200 "

[momen268268]

للاسف مجاليش اي ايميلات حتى الان 

 

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

[بحار الاكسس]

ارسلته مرة اخرىmessage_bakar_el_access.rarmessage_bakar_el_access.rarmessage_bakar_el_access.rar

[momen268268]

[momen268268]

جزاك الله خير اخي

ونشرته مره اخرى لتعم الفائده 

message_bakar_el_access.rar

[Shivan Rekany]

2 ساعات مضت, زياد الحسناوي said:

تماما كما وضح الامر اخي @saleh204

فلا توجد طريقة اخرى غير الفورم الزمني 

بلا هناک  طریقە اخری بدون نموذج 

و موجودە فی الموقع

ستجدونە اذا تبحثون علیە

والا غدا اذا ما انساە ساعطیکم لانی الان عم استخدم موبایل ولیس لدی لابتوب 

[momen268268]

الكود لا يعمل على اكسس 2003 هل يوجد حل؟

تظهر لي هذه الرساله

[momen268268]

تم حل المشكله بحمد الله

[زياد الحسناوي]

منذ ساعه, Shivan Rekany said:

بلا هناک  طریقە اخری بدون نموذج 

و موجودە فی الموقع

ستجدونە اذا تبحثون علیە

والا غدا اذا ما انساە ساعطیکم لانی الان عم استخدم موبایل ولیس لدی لابتوب 

@Shivan Rekany

ان شاءالله سيتم البحث 

واذا لم اصل لنتيجة سانتظر جوابك

[رمهان]

 

شكرا @بحار الاكسس معلومة جديدة بالنسبة لي

لا اجد جديد الا و @أ / محمد صالح موجود 

وهنا 

 

[Shivan Rekany]

16 ساعات مضت, زياد الحسناوي said:

واذا لم اصل لنتيجة سانتظر جوابك

اليك هذا لا اعرف من هو صاحبه
لذلك ادعوا له

اخفاء رسالة بعد عدد ثواني.mdb

[momen268268]

بارك الله فيك اخي @Shivan Rekany

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

[زياد الحسناوي]

4 ساعات مضت, Shivan Rekany said:

اليك هذا لا اعرف من هو صاحبه
لذلك ادعوا له

اخفاء رسالة بعد عدد ثواني.mdb

@Shivan Rekany

استاذ جاري التنزيل والتطبيق

[jjafferr]

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

 

ماشاء الله ، مادام كل الشباب مشاركين ، فانا ادلو بدلوي كذلك 🙂

 

 

و

 

جعفر

[علي جاسم]

بحر من المعلومات ماشاء الله عليكم

اللهم احفظ جميع الاخوه في هذا المنتدى