اذهب الي المحتوي
أوفيسنا

رمهان

الخبراء
  • Posts

    2,390
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    24

كل منشورات العضو رمهان

  1. العفو استاذ سعيد وانا اسحب طلبي فلك حرية وقتك ! واعتقد فكرتك هي برنامج بحد ذاته وتحتاج لوقت كبير ! ادعو لك بالتوفيق يغلق هذا الموضوع
  2. القي نظره هنا http://arabteam2000-forum.com/index.php?/topic/293030-%D9%83%D9%8A%D9%81-%D9%8A%D9%85%D9%83%D9%86-%D9%85%D9%86%D8%B9-%D8%A5%D8%B6%D8%A7%D9%81%D8%A9-%D8%B3%D8%AC%D9%84-%D8%AC%D8%AF%D9%8A%D8%AF-%D8%AA%D9%84%D9%82%D8%A7%D8%A6%D9%8A-%D9%81%D9%8A-%D8%A7%D9%84%D9%86%D9%85%D9%88%D8%B0%D8%AC/#comment-1397314 ولي عودة تحياتي
  3. العفو ومارايك لو نكمل لكي يكون العمل عملي اكثر لو حبيت اعرض الموضوع ؟ ولو كان هناك اكثر من موضوع بنفس الوقت ؟ اريد محاولتك استاذ سعيد فنحن كلنا نتعلم من بعض ! بالتوفيق
  4. برايي افضل بهذا الراي لم يعد هناك حاجة او وجود ل اللوب !! الكود كافي بالعد كل ثانية واظهار الفورم ! بالتوفيق
  5. كلامك صحيح واوافقك ! يمكن يصبح الكود هكذا Private Sub Form_Timer() If DCount("*", "tbl_MIssions", "mish_time=time() and mish_date=date()") > 0 Then DoCmd.OpenForm "alarm" clock.Caption = Time() End Sub تحياتي
  6. اخي سعيد اضافة الى الملاحظات السابقة وجدت انك تفلتر على تاريخ اليوم بالاستعلام ! وهذا ليس له اهمية مادام المقارنة على الوقت ! فالنظام راح يشيك يوميا على الوقت حسب تحليلك ! وهذه فكرة بسيطة Private Sub Form_Timer() If DCount("*", "tbl_MIssions", "mish_time=time()") > 0 Then DoCmd.OpenForm "alarm" clock.Caption = Time() End Sub بالتوفيق
  7. اخي سعيد اولا ومن النظره الاولى لا انصح بهذا الكود ! ياساتر انت كل ثانية بتلف على السجلات وانشاء كائن ثم حذفه ! ثانيا لاحظت التالي وبالنظر في الكود السابق : 1. جعلت عد السجلات قبل التحرك اخيرا ثم اولا وهذا غير منطقي حيث التحرك يسبق العد لان الفائدة اصلا من التحرك هو الحصول على العدد الصحيح للسجلات 2. تتم المقارنة بناء على الوقت فقط ومهملا التاريخ معناته التنبيه يومي فهل هذا مستقصد وباهمال التاريخ 3. خلو الرسالة من موضوع التنبيه فقط ظهور الرسالة 4. لو كان هناك موضوعين بنفس الوقت هل كودك السابق سيظهر النموذج مرتين ؟ اعتقد انك لم تجرب الكود عمليا !! تحياتي
  8. حلوه الفكره ولو تلاحظ مشاركاتي السابقة كلها تعمل بشكل صحيح ولك بها فائدة هنا وعندما فقدت الامل وما رايك بتمرين خفيف : لو عايزين الدرجة الثالثة ؟؟؟؟ بالتوفيق
  9. استاذ عبدالفتاح انا عايز اشوف السجل الثاني (الدرجة الثانية ) فقط بدون سجلات اخرى وعلى مثالك؟ لان هذا عنوان الموضوع والمطلوب وليس اخر درجتين ؟ وبما انها سهلة ياليت نشوف التطبيق على مثالك ؟ لاني سهران وماعادشي بجمع ؟ كان عندي شويتين تركيز وراحت في المشاركات السابقه معاك !! تحياتي
  10. جميل ومشكور بس انا عايز السجل الثاني فقط ! اي الدرجة الثانية فقط ؟
  11. اعتقد هذا المرجع استاذ عبدالفتاح http://www.access-programmers.co.uk/forums/showthread.php?t=150368 لكن هل ممكن ترفع ملفك بعد التطبيق عليه بالتوفيق
  12. وهذه بالاستعلام وبدوال المجال! SELECT tblDrgat.empId, DLookUp("[darganame]","tbldrgat","drgadate=#" & DMax("drgadate","tbldrgat","empid=" & [empid]) & "#") AS 1, DLookUp("[darganame]","tbldrgat","drgadate=#" & DMax("drgadate","tbldrgat","drgadate<#" & DMax("drgadate","tbldrgat"," empid=" & [empid]) & "# and empid=" & [empid]) & "#") AS 2 FROM tblDrgat GROUP BY tblDrgat.empId; وهناك افكار اخرى ! وهذه على جدول الموظفين SELECT جدول1.eid, جدول1.eName, DLookUp("[darganame]","tbldrgat","drgadate=#" & DMax("drgadate","tbldrgat","empid=" & [eid]) & "#") AS 1, DLookUp("[darganame]","tbldrgat","drgadate=#" & DMax("drgadate","tbldrgat","drgadate<#" & DMax("drgadate","tbldrgat"," empid=" & [eid]) & "# and empid=" & [eid]) & "#") AS 2 FROM جدول1;
  13. اوكي الحلول كثيرة ! في نموذج ومن خلال مربع قائمة تستطيع ترتيب البيانات عكسي حسب التاريخ وتستخلص ماتريد من القائمة في مربعات نص drgat.rar
  14. الصق هذا الاستعلام SELECT tblDrgat.empId, DLookUp("[darganame]","tbldrgat","drgadate=#" & DMax("drgadate","tbldrgat","empid=" & [empid]) & "#") AS Expr1 FROM tblDrgat GROUP BY tblDrgat.empId;
  15. اخي عبدالفتاح اولا ايه رايك في التعبير التالي والذي يستخرج اخر درجة ! طبعا استخدمت التاريخ حسب رغبتك تقريبا ! Expr1: DLookUp("[darganame]","tbldrgat","drgadate=#" & DMax("drgadate","tbldrgat","empid=" & [empid]) & "#") وبعد كذا نشوف الدرجة الثانية !
  16. جميل جدا اعتقد لم يصل لك ما اريد في النقطة الثانية اقصد عمود dargaid هو تسلسل للدررجات ؟ هل اعتمد عليه لانه يوجد لدي فكره بالاعتماد عليه ؟ اقصد مثلا ان اكبر تسلسل للدرجة وللموظف هو بمثابة اخر درجة ؟ فمثلا التسلسل 10 هو اعلى تسلسل للموظف 1 ؟ هل اعتمد عليه ؟
  17. هذه سهلة جدا ! واحد الافكار : هناك ملف والذي يظل مفتوحا عند فتح ملف الاكسس وبه كذلك المستخدمين الذي شغالين على القاعدة ! فاشوف متى وجد الملف معناته القاعده مفتوحة ؟ ولكن المشكلة كيف يتم اغلاق القواعد الامامية ؟ والحقيقة اخ سعيد مررت بمشاركات كثيرة هنا في المنتدى حول هذه النقاط ! فخليني امر على اغلبلها لكي لا نكرر المضمون والاهم من ذلك خليني ارسم تصور او سيناريو معين ل " افضل طريقة لضغط القاعدة الخلفية وعن بعد او برمجيا " والفكرة او السيناريو هو الاهم ! تحياتي
  18. اخي عبدالفتاح ايه رايك نسولف معاك شوية لي ملا حظات 1. عملت ربط في الاستعلام ربط خارجي ! اي احضار كل الموظفين ! لماذا ؟ لماذا لا يكون ربط داخلي ؟ بالعربي اخترت نوع الربط الثاني مش الاول ! فانا مش شايف حاجة لنوع الربط الثاني ؟ لانك عايز الاسم ؟ ومستحيل ان يكون هناك درجة لموظف مش موجود ! والا ممكن هذا ؟؟؟؟؟؟ 2. استخدمت اكبر تاريخ لعرض اخر درجة مع العلم وجود تسلسل ؟ لماذا ؟ فانا شايف ابني على التسلسل اسهل من التاريخ ؟ والا ممكن لا يوجد تسلسل للدرجات او قد يدخل درجات سابقة بتسلسل جديد ؟ مثلا ادخال البيانات تتم من اكثر من مستخدم ولبيانات سابقة قديمة؟؟ تحياتي
  19. يافنان يا استاذ كرار ! وبالاستعلام ولجمبع اصدارات الاكسس ! هذه الفكرة استخدمتها في عمل نموذج داتا شيت بها متغيرة عناوين السجلات ! مبدع والله ! تحياتي
  20. عزيزي بعد التجربة لا يتم ضغط القاعدة الخلفية بقطع اخر اتصال ! لم يعتبره اغلاق للقاعدة ! اذا لابد من الفتح الصريح والاغلاق ! وهنا اعتبره افضل ..! لان الاتصال يحدث عند فتح كائن منضم لاحد الكائنات الخلفية وينقطع عند اغلاق الكائن ! فليس من الافضل يتم الضغط عند قطع الاتصال لانه يحدث كثيرا وليس فقط عند اغلاق القاعدة الامامية وهنا نستنتج انه لم يحدث مشاكل عند الاستاذ جعفر لانه لن يتم ضغط الخلفية الا بالفتح والاغلاق الصريح ! ولن يتم الا اذا لم يكون هناك اتصال بالقاعدة نهائيا هنا مارايك بالذهاب للقاعدة الخلفية ثم عمل ضغط واصلاح يدوي ؟ تحياتي
  21. ما شاء الله عليك استاذ سعيد طلعت انت من الناس الذي يعرفون هم ماذا يعملون والله انت سبقتني وانا اكتب نفس السؤال ؟ لانه فعلا يجب ان يطرح ؟ نجرب ونعود ! تحياتي
  22. تستطيع في الاكسس 2007 ومافوق وفي الاستعلام بالضغط على مجاميع او اجمالي بالانجليش totals ومن شرط الادوات وسيظهر لك خيار جمع الاعمده بالتوفيق
  23. بعد التجارب الامر requery فقط هو اختصار ل me.requery وللتجربة وضعت مربع قائمة فعند البحث لا تظهر النتائج بها لانها تحتاج ريكويري فاما تعمل ريكويري خاص بها او docmd.requery سيعمل للجميع فعند استخدام requery فقط لم تتحدث القائمة مما يظهر لنا انه نفس me.requery على غرار docmd.requery والذي قام بعمل ريكويري للكل تحياتي بحث واضافة-update.rar
×
×
  • اضف...

Important Information