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

Moosak

أوفيسنا
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    2300

  • تاريخ الانضمام

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

  • Days Won

    57

 نوع المحتوي 

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

  1. Moosak
    شكرا جزيلا لك أخي @Amr Ashraf هدية رائعة كروعة صاحبها 🙂 بشرنا أيش أخبار الـ #C عندك ؟ 😊
  2. Moosak
    الله الله الله ... شكرا على الهدية الرااااااااااائعة ... 😊🌹
  3. Moosak
    @ابو جودي الله يحفظك يا عبقري ويزيدك من واسع علمه وفضله ... 😊 وعبي يابا .. 😂
  4. Moosak
    بعد إذنك باش مهندس محمد @ابو جودي 🙂 اشتغلت على نفس ملفك وعملت كل العمليات في كويري واحد .. وطلع عندي نتيجة قريبة منك بفارق يومين لكل شخص ( إزاااااي ؟؟ ... متسألنيش ) 😂 اسم الكويري : Qry_Moosa_Calc EmploymentPeriods.accdb
  5. Moosak
    السلام عليكم أخي @figo82eg 🙂 أنظر أنا لم أشتغل على ملفك تلافيا للدخول في تعقيدات المسميات وغيرها .. وعملت لك ملف عام وقاعدة عامة لجلب الملفات وإنشائها تلقائيا (في حال عدم وجودها) ووضعها في مجلدات بجانب قاعدة البيانات سواء كانت ملف واحد أو مفصولة لواجهات وجداول .. ولا تتأثر الروابط فيها بنقل البرنامج من جهاز لآخر بشرط نقل المجلدات معها ووضعها بجانبها 🙂 ويمكنك تطبيقها بسهولة على برنامجك مع مراعاة نقل الموديول المرفق وكذلك تغيير مسميات الحقول في الكود (مهم جدا) . وهذه صورة للنموذج مع وجود المرفق . في هذا المثال سيتم إنشاء المجلدات بهذه الصورة : C: \ مكان القاعدة \ الوارد \ دائرة المالية \ مواضيع عامة \ 1 \ ثم اسم الملف أو الصورة وعند نقل البرنامج يجب عليك نقل كل هذه الملفات بنفس مواقعها : AttachFilesToDB.rar
  6. Moosak
    بعد التجربة الدالة راااائعة ما شاء الله ويمكن تطبيقها على أكثر مما تتصور ، واحتياجات متعددة 🙂 .. وهذه بعض الأمثلة : 1 2 3 4 5 6 7 8 9 1-2-3-4-5-6-7-8-9 12-34-56-78-9 1234-5678-9 1/2/3/4/5/6/7/8 A/B/C/D/E/F/G م ح م د ع ص ا م شـــكـــرا
  7. Moosak
    وعليكم السلام ورحمة الله وبركاته ..🙂 ألف شكر باش مهندس محمد ..🌹 وعلى طول نجرب ونقول ينقل للمكتبة اللي بالي بالك 😁
  8. Moosak
    اللهم آمين يارب العالمين وإياكم أستاذي العزيز 😊🌹
  9. Moosak
    قليل مما عندكم يا سيدي 😊🌹
  10. Moosak
    السلام عليكم ورحمة الله وبركاته أخي @shatat 🙂 بعد العديد من التجارب قمت بتصميم هذا النموذج ولله الحمد 🙂 : طبعا التقويم دايناميكي يتغير بحسب الشهر الذي يقع فيه التاريخ الذي بالأعلى ( Target Month ) .. وتظهر البيانات بالأسفل وتتغير حسب اسم الموظف والشهر المختار .. كل مشروع يتم تسجيله يحفظ باسم الموظف المختار بالأعلى .. وهذه دعوة للتجربة وإبداء الرأي 😊🌹 TimeSheet Project.accdb
  11. Moosak
    تفضل أخي @حامل المسك 🙂 الحاق البيانات.accdb
  12. Moosak
    عندي لم تظهر صفحات فارغة .. وسبب ظهورها على ما أعتقد هو عملية نقل البرنامج بين الأجهزة واختلاف إعدادات الطابعة الافتراضية .. والحل إما أن يتم تعديل تنسيق التقرير حسب الطابعة الافتراضية في جهازك ( وهذا غير عملي في حال تنقل البرنامج بين الأجهزة ) .. وإما أن يتم ضبط إعدادات التقرير على طابعة محددة فتبقى الإعدادات نفسها في كل الأجهزة .. 🙂
  13. Moosak
    هناك حيلة صغيرة يا أخي @waledstar سأعلمك إياها بدون الحاجة لبرامج خارجية 🙂 بعد أن تقوم بتصميم جميع التقارير قم بتصميم تقرير تجميعي .. بحيث تجمع فيه كل التقارير على شكل تقارير فرعية .. وثم تفصل بينها بأداة فاصل الصفحات () .. فيظهر لك الشكل النهائي بهذه الطريقة : بعدها تقوم بتصدير التقرير التجميعي على صيغة PDF فيحصل المطلوب ☺️ وهذا مثال للطريقة : Many Reports in 1 PDF.accdb
  14. Moosak
    وعليكم السلام أخي بلال 🙂 تفضل : البرنامج .rar
  15. Moosak
    هذي دمها عسل زيك لأ بجد .. تتأخر معاي دقيقة كاملة
  16. Moosak
    لله درك يا @ابو جودي رجل المهمات الصعبة 😉💪 حلوة جدا .. بس تتأخر حبتين .. 😏 يعني تبدأ تقفل بعد دقيقة تقريبا .. إلى المكتبة العامرة بالأكواد 😁✌️
  17. Moosak
    نعم هي رسائل متتالية تضغط موافق لتختفي وتفتح لك الرسالة الثانية فالثالثة وهكذا .. الفكرة : رسائل ذاتية الاختفاء ، تختفي لتظهر الأخرى ..
  18. Moosak
    قمت الآن بتعديل المرفق .. عملت فكرة ثانية 🙂 هنا ستدخل في مسألة هل يمكن عمل رسائل ذاتية الاختفاء 🙂 .. ولكن للأسف ليس لدي فكرة ..
  19. Moosak
    وعليكم السلام ورحمة الله وبركاته أخي عمر 🙂 هذا حسبما فهمت .. عملت فكرتين .. ضع هذا الكود في حدث عند الإغلاق : Private Sub Form_Close() Dim x As Integer '----------------------------------------------(الفكرة الأولى) DoCmd.GoToRecord , , acFirst For x = 1 To Me.Recordset.RecordCount MsgBox Me.n DoCmd.GoToRecord , , acNext Next '----------------------------------------------(الفكرة الثانية) Dim txt As String DoCmd.GoToRecord , , acFirst For x = 1 To Me.Recordset.RecordCount txt = txt & Me.n & vbNewLine DoCmd.GoToRecord , , acNext Next MsgBox txt End Sub aa.accdb
  20. Moosak
    وحشتنا ياباش مهندس @ابو جودي 🙂
  21. Moosak
    وعليكم السلام ورحمة الله وبركاته .. 🙂
  22. Moosak
    " إذا عُرِفَ السبب بطل العجب " أول ما تبادر لذهني بعد قرائتي للموضوع : ما الهدف من ذلك ؟ والجواب عن هذا السؤال هو ما سيفتح لنا باب الحل المناسب🙂
  23. Moosak
    وهذه طريقة أخرى بدون استخدام التايمر 🙂 Process Par.accdb
  24. Moosak
    شكرا جزيلا لك أخي @kanory 🙂🌷🌸 سعيد جدا أنك استفدت منها 😊🌹
  25. Moosak
    ولا أنا 😅✋🏻
×
×
  • اضف...

Important Information

  I accept