اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

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

اخوتي اريد الكود الخاص بالعملية التالية :

عندي حقل فيه تاريخ انتهاء اقامة العامل( تاريخ الاقامة )

واخر فيه تاريخ اليوم الحالي ( تاريخ اليوم )

اريد الكود الذي يظهر لي رسالة اذا بقي على انتهاء تاريخ الاقامة 20 يوم مفادوها انه يجب تجديد الاقامة

شاكراً لكم تعاونكم

اخوكم

ابو عبدالله

قام بنشر

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

هذا برنامج العملاء مرفق به رسالة تنبيه في النموذج : : maneger form

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

أخيك سهل احمد ( ابو نعيم )

برنامج العملاء.rar

قام بنشر

اذا كان النموذج مصدرة استعلام

في نفس الاستعلام وفي حقل جديد ضعي هذا الشرط

الانتهاء:[تاريخ الاقامة]-20

ثم حقل أخر فيه هذا الشرط

iif([الانتهاء]>date();"يجب تجديد الاقامة ")

قام بنشر

شكراً لك اخي سهل والشكر موصول لك اخي نشوان

الي بغيته هو كتابة الكود لوحده فقط وليس في برنامج لأني توني مبتدء علماً ان حقل تاريخ الاقامة وحقل تاريخ اليوم الحالي مصدرهم جدول واحد وفي نموذج واحد ايضاً اريد ان تظهر رسالة التنبيه في ( مسج بوكس ) وليس في النموذج 0

اكرر شكري لكم اخواتي واقول جزاكم الله خير

ابو عبدالله

لا عز لنا إلا بالإسلام
قام بنشر (معدل)

السلام عليكم

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

والطريقة التي استخدمها هي

عند كل تسجيل دخول للبرنامج يقوم بعرض رسالة للهويات التي سوف تنتهي خلال شهر

يوجد خيارين في الرسالة الاول No لتجاهل الرسالة وبدون اتخاذ اي اجراء

والثاني Yes وعند الضغط عليه يقوم بعرض نموذج يعرض فيه اسم الموظف ورقم هويته وتاريخ انتهائها وهكذا

إن شاء الله اول ما انتهي منها رح حط مثال عن الكلام الي قلته

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

مع تحياتي

تم تعديل بواسطه أمجد جمالي
قام بنشر

بارك الله فيك اخوي أمجد وهذا العشم فيكم اعضاء هذا المنتدى الرائع

انا منتظر المثال , ويليت يكون في اقرب وقت

اكررررررررررررررر شكرررررررررررررررررررررري لكككككككككككككككككككك

اخوك

ابو عبدالله

لا عز لنا إلا بالإسلام
قام بنشر

السلام عليكم

تفضل اخ بتال هذا هو المثال

من الممكن ان تكتشف بعض العيوب من خلال تطبيق هذا المثال في برنامجك

وذلك للأسباب التالية

1-هذه الطريقة لم انشرها بعد على الشبكة يعني لم يجربها اي مدخل بينات عندي

2-من الممكن ان تلاحظ بطئ في البرنامج خصوصاً اذا كان عدد السجلا ت كبير

لتفادي ذلك بإمكانك تقليل عدد الايام الى 20 اذا احببت

من بعد الدراسة والتفكير الطويل وجدت بأن هذه هي افضل طريقة

وانا ارحب بأي اقتراح من أي عضو

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

CheckingExpiryDate.zip

  • 2 weeks later...
قام بنشر

الفكرة ممتازة جدا و يمكن اْستغلالها في اكثر من مجال, ها يمكن مثلا عمل زر لطباعة تقرير بالنسبة للموظفين الذين تخرج أسماءهم في رسالة التنبيه, ؟

قام بنشر

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

شكراً لك اخ biskra على تعقيبك

ايضاَ اكتشتفت عدة ثغرات مثل

1-اذا كان يوجد سجل لم يدخل فيه تاريخ يعني قيمته Null

2-تتكرر الرسالة كل مرة لكل موظف

وفي الوقت الحالي اقوم بتطوير طريقة ثانية وسوف اطرحها فور انتهائها بإذن الله

أما بالنسبة للوثائق التي تكون تاريخ بدايتها وانتهائها بالهجري مثل الاقامة

في الدالة Ap_LoopDateCode

اضف هذا الكود

Calendar = vbCalHijri

تحياتي

  • 2 weeks later...
قام بنشر

أخي أمجد وقعت يدي على مثال من موقع أجنبي يشبه كثير المثال الذي قمت بتصميمه و هو جد رائع قد يعطيك افكار كثيرة عن الغاية المرجوة خاصة أن الكود الذي يعتمده سهل للفهم, أضعه في المنتدى ربما يسهل عليك تصميم مثال آخر يمكن استغلااه بسهولة.

reminders_2000.zip

قام بنشر

السلام عليكم

اخي الكريم biskra حملت الملف وفعلاً هذه الطريقة سهلة جداً

لكن يقوم الكود بتحقق من تواريخ منتهية باستخدام Dcount

وبعيدة كل البعد عن مثالي

في مثالي اقوم بتنبيه المستخدم قبل 30 يوم من انتهاء الوثيقة ليس بعد انتهائها

والفرق كبير بين الاثنين

تحياتي لك واشكر تواصلك

قام بنشر

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

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information