Jump to content
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

عزالدين المنصوري

01 New pie
  • Content Count

    47
  • Joined

  • Last visited

Community Reputation

6 Neutral

About عزالدين المنصوري

  • Rank
    Name

Profile Information

  • Gender (Ar)
    ذكر
  • Job Title
    engineer

Recent Profile Visitors

The recent visitors block is disabled and is not being shown to other users.

  1. السلام عليكم ورحمة الله وبركاته تحية لكم ايها الاخوة احاول اعمل نموذج في الاكسس مرتبط في الباوربوينت بحيث عند فتح النموذج يبدء العرض التقديمي يشتغل اوتو واذا ممكن نطوره اكثر بوضع زر لأختيار العرض التقديمي الذي نريد عرضه على الشاشة لانه سيكون هذا النموذج على يعرض على شاشة للزبائن او المرضى في العيادة الطبية(احتاج اضافتة الى قاعدة بيانات عيادة طبية لذلك طلب الدكتور عرض تعليمات للمراجعين من خلال الباوبوينت) ممنون منكم جميعا 🌷🌼
  2. السلام عليكم ايها العزيز تحية لك من القلب عاشت يمينك على الشغل الجميل والمساعدة الراقية جربت الكود وكان ناجح 100% الف تحية ودعاء لك بالحفظ والتوفيق
  3. صباح الخير والبركة الأخ @الفلاحجى تحية طيبة لك عندما جربت الكود كانت النتيجة رائعة جدا لكن في اليوم التالي فتحت البرنامج وجربته ايضا" فواجهنا تحدي اخر يبدو انه صعب وهو ان الكود يبحث في جدول الكشف عن اخر اعلى قيمة ويضيف لها خمس دقائق لكن بما انه يوم جديد فلا توجد قيمة جديدة غير التي خزنت بالامس فيقوم بالاضافة او بالبدء من منتصف الليل اي بعد الساعه 12 ليلا" لذلك نحتاج خزن قيمة الوقت الحالي قبل البدء باضافة كشف جديد او محاولة اضافة الوقت الحالي مع اول كشف دون اختيار اعلى قيمة من جدول الكشف (ممكن توقف عمل الكود فقط في اول كشف ثم يبدء العمل في الثاني واللي بعده ) لانه مش ممك
  4. عاشت عاشت الأيادي الله يوفقك ويحفظك عمل مميز انا ممنون منك والله يكثر من امثالك #اوفيسنا_كنزنا
  5. الف تحية وسلام لك ايها الاستاذ الفاضل انا ممنون منك على الشغل الجميل والجهد المميز استاذ في ملاحظات 1- وقت حضور الدكتور انت وضعتة افتراضي الساعه 7pm لكن الدكتور ايضا يعمل عند الصباح يوم الجمعة بالتالي نحتاج نجعل الحقل اوتوماتيك يأخذ الوقت في لحظة فتح النموذج بالتالي فان الدالة عندما تبحث على اخر قيمة دخلت لجدول الكشف ستجدها نفسها لحظة فتح النموذج وتضيف عليها . 2- وضعت هذا الكود Id ولما بحثت في الجدول وفي النموذج لم اعثر على حقل او مربع نص بهذا العنوان فماذا يمثل هذا الحقل 3- ممكن تشرح الشرطين في دالة Dlast وهما ( "#" & تاريخ.Me & ," [تاريخ
  6. السلام عليكم استاذ اين هي الخطوات هذه فقط عناوين في اي مكان اجد الشرح لتلك العناوين الف تحية .....
  7. السلام عليكم استاذ هذا هو المثال اللي طلبتة اتمنى ان اكون ماثقلت عليكم تحياتي حساب الوقت.rar
  8. اشكرك جدا استاذ على المتابعة وابداء النصيحة والدعم ولكن هل تقصد استبدال الكود بالكامل مع دالة Dlast ام فقط تعديل الكود تحياتي ودعائي لكم
  9. السلام عليكم استاذ الله يبارك فيكم ويحرسكم من كل شر وجزاك الله الف خير استاذ انا نفذت الكود وحصل رسالة خطأ نصها يقول (لايمكن تخصيص قيمة لهذا الكائن ورقم الخطأ 80020009) ولما اضغط على debug يفتح محرر اكواد الفيجول على سطر (()Me.mm = DateAdd("n", 5, Now ملاحظة : انا وضعت في العداد اسم الجدول الذي يحتوي السجلات المطلوب العمل عليها + كذلك وضعت الكود في حدث عند الفتح اشكرك جدا لمتابعتك واهتمامك استاذ محمد ابو عبدالله
  10. احسنت استاذ جزاك الله الف خير نعم انا مشيت بهذا الطريق ووصلت الى نقطة او نتيجة غير ناجحة لكوني ليست مبرمج بارع حيث عملت عداد او دالة for كما في الكود (لغرض اضافة خمس دقائق لكل كشف ) Dim mm As Date ("رقم الحركة","*")For i = 1 To DCount (()mm] = DateAdd("n", 5, Now] Next i mm : هي حقل الوقت المتوقع حاولت اضيف خمس دقائق لكل كشف او حركة وضعت هذا الكود في حدث عند الفتح لنموذج القائمة الذي مصدر بياناته هو جدول الكشف الذي يحتوي على كل الحركات او الكشوفات النتيجة بقي الحقل mm فارغ ولم تضاف له اي قيمة اتمنى مساعدتكم لكتابة الكود الاصح ووض
  11. السلام عليكم ايها الاخوة ورحمة الله وبركاتة اتمنى ان تكونو بالف خير وصحه وسلامة لدي قاعدة بيانات عيادة طبية تحتوي على قائمة للمرضى المسجلين في العيادة لغرض الكشف المطلوب حساب وقت الحضور المتوقع لكل شخص لكي يحضر في الموعد او الوقت المخصص له (لغرض تقليل الازدحام في الوقت الراهن لتجنب العدوى من الوباء(كورونا) المنتشر) الحقول في الجدول (رقم الكشف_رقم المريض _ تاريخ _ وقت التسجيل _ (واحاول اضيف حقل جديد اسمه "وقت الحضور") اتمنى اسمع منك سريعا حتى ولو فكرة ولكم خالص التحية والدعاء
  12. السلام عليكم ورحمة الله وبركاته ايها الاخوة الكرام ارجو مساعدتكم في حل مشكلة هذه الرسالة التي ظهرت بعد تغيير نظام التشغيل وتغيير الاوفس الى 2019 the visual basic for applications project in the database is corrupted حيث تم ايقاف كل اكواد الفيجول ولم تعد قاعدة البيانات شغالة جزاكم الله خير جزاء المحسنين انتظر ردكم الجميل 😍
  13. احسنت استاذي العزيز جزاك الله خير جزاء المحسنين والله يبارك فيك
×
×
  • Create New...