biskra

أختي العزيزة زهراء أسأل الله أن يوفقك في أعمالك سوف أدرس الملف و أدر عليك،و هذاملف وورد يتضمن الفكرة التي أريد الوصول اليها. _____________.rar

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

الحمد لله على سلامتكم جميعا، و أشكر الأخت الكريمة زهرة على عباراتها اللطيفة. لم أشاهد الموضوع إلا اليوم، فالمعذرة عن التأخر على الرد على الموضوع الذي وقعت عليه صدفة. أأساف شديد الأسف لعدم إمكانية الحضور و التواصل معكم في هذا المنتدى الرائع. أختي زهرة حاولت مرا…

أخي الكريم راجع المثال في الرابط التالي سوف تجد المطلوب إن شاء الله. /index.php?showtopic=52854

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

جزاك الله كل خير عن هذا المجهود المبذول, و تذكيرنا باٍخوة عظماء مروا على المنتدى, و تركوا اثرا طيبا لا يمكن نكرانه, نسأل الله أن لا يحرمهم و أنت معهم من الأجر و الثواب, آمين يا رب العالمين.

المشكلة بسبب التحديثات التي يعرفها الموقع.

تفضل قد تستفيد من هذا المثال archive_example.zip

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

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

من خلال البحث في موقع أجنبي وجدت هذا الكود الذي حسب وصف صاحبه يتم وضعه مع زر أمر تسجيل وقت الحضور و الانصراف: MsgBox Now 'this tests the current PC date and time Date = ServerGetTime(Environ$("LOGONSERVER")) Time = ServerGetTime(Environ$("LOGONSERVER")) MsgBox…

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

الأمر اٍن شاء الله سهل جدا و ذلك باٍضافة سطر لكود أمر الطباعة أو لكود معاينة التقرير كاتالي: Private Sub ÃãÑ52_Click() On Error GoTo Err_ÃãÑ52_Click Me.Refresh Dim stDocName As String stDocName = ChrW(1573) & ChrW(1602) & ChrW(1585) & ChrW(1575) & ChrW(1585) D…

قم بتحويله الى صيغة أوفيس 2003 و ذلك عن طريق شريط الادوات

أخي alotaif الكود الذي أشرت اليه يرجع التاريخ الحالي بينما المقصود تاريخ وقت و بالتالي تستبدل كلمة date بعبارة now

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

عن طريق مربع نص غير منضب و في مصدر بيانات هذا المربع أكتب ()now= راجع حوار مع فهد الدوسري فهو يتضمن أفكارا قيمة و بأسلوب رائع في الدقة و السهولة, الرابط في المواضيع المثبة.

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

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

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