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

محمد احمد لطفى

الخبراء
  • Posts

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

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

  • Days Won

    2

كل منشورات العضو محمد احمد لطفى

  1. أستاذ @Moosak أستأذن حضرتك فى شاشة ارسال لعدة اشخاص أن تكون الرسالة فى جدول الرقم حتى تصبح مثل الصورة و المرفق ( و ارسال المرفق كما هو ) والهدف سأقوم بعمل استعلام تحديث لاضافة الاسم و رقم الهاتف و الرسالة وجزاك الله خيراً WhatsappMessageSender.accdb
  2. إعدادا الوفيس عادية مبيغيرش حاجة الا ( أمان الماكرو بعمله تمكين) اذا كنت ترغب أن ارفع صور الاعدادات حدد اى شاشة اقوم بتصويرها هذا لكثرتها
  3. أستاذ @Moosak لا يوجد مشكله بالبرنامج تمت التجربة يرسال الرسالة و المرفق ارجو اضافة الرسالة بجوار رقم الهاتف فى حالة اضافة عليها اسم او بيانات اخرى لكل شخص على حده
  4. فى حالة ان رقم التليفون غير مسجل فى الواتس تأتى رسالة ( هذا الرقم غير صحيح ) و يجب الضغط على موافق هل يمكن الموافقة من البرنامج نفسه لكى يستمر الارسال وجزاكم الله خيراً Whatsapp-Message-Sender.rar
  5. ان أمكن فى حالة ان رقم التليفون غير مسجل فى الواتس تأتى هذه الرسالة و يجب الضغط على موافق هل يمكن الموافقة من البرنامج نفسه لكى يستمر الارسال Whatsapp-Message-Sender.rar
  6. أستاذى @ابو البشر تمت التجربة ولكن لا يرسل الا لأول شخص ويجب الضغط متابعة الدردشة من صفحة الانترنت الملف فى المشاركة الاولى فى الموضوع يعمل جيدا هل يمكن تنفيذ الارسال باسم كل شخص + اضافة الرسالة المطلوبة
  7. ممكن سؤال بالنسبة لو الرسالة هتتغير باسم كل شخص ممكن
  8. أستاذى @Barna جزاك الله خيراً و يمكن التحديد بالشهر مباشرةً
  9. أستاذى @Barna جارى بعض التجارب و ممكن ميتربطش بالنموذج عن طريق استعلام جديد جزاك الله خيراً
  10. هو حل كويس بس بيأثر على النموذج الفرعى ياريت ميأثرش على النموذج الفرعى
  11. أستاذى @Barna جزاك الله خيرا عند تحديد اليوم مثل 5-2-2014 يعمل و لكن عند تحديد الشهر وهو المطلوب لا يعمل مثل شهر 2-2014
  12. فى هذا التقرير عند معاينة الطباعة يكون تحديد شهر معاينة الطباعة من التقرير عن طريق InputBox أريد تغييره الى خليه فى النموذج Vl = InputBox("ادخل التاريخ") Dim Rcount As Integer Rcount = Nz(DCount("*", RecordSource, "[date1]like '*" & Vl & "*'"), 0) RecordSource = "select * from " & RecordSource & " where " & RecordSource & ".[date1]like'*" & Vl & "*'" If Rcount = 0 Then DoCmd.CancelEvent Exit Sub End If وجزاكم الله حيراً test print.rar
  13. دالة NZ وهي اختصاراً لكلمتي : NULL Zero ومهمتها أن يتم التخلص من مشكلة وجود القيمة Null في بعض العمليات مما يعطي خطأ صيغتها كما يلي : A = NZ(B,0) أو A = NZ(B) S = NZ (V,"") ومن هذا يتضح أن لهذه الدالة ممران 1- القيمة المطلوب فحصها 2- القيمة المعادة في حال كون القيمة الأولى Null وفي حال عدم تعيين القيمة الثانية تعيد لنا هذه الدالة القيمة صفر في حال كون القيمة الأولى Null منقول
  14. أستاذى @AbuuAhmed كما قلت أنها أبسط قليلا و يمكنن أن أعدلها هذا بسببى أنا ليس أكثر و لو كان يمكننى أن اختار أكثر من إجابة كنت أضفت إجابت حضرتك لانها تعمل و ممكن حضرتك توضح أين الخطأ
  15. جزاك الله خيرا أستاذى @أبو إبراهيم الغامدي
  16. أستاذى العزيز @أبو إبراهيم الغامدي ظهرت فى الشريحة الثالثة ارقام بالسالب حاولت تكرار ما سبق فى الشرائح الاخرى بائت بالفشل
  17. شكرً لمشاركتك أخى @AbuuAhmed جزاك الله خيراً و لكنى مستمر مع أستاذى @أبو إبراهيم الغامدي لأنها أبسط و يمكننى التعديل عليها أستاذى @أبو إبراهيم الغامدي أسف و لكن عند حساب الشريحة الثالثة لوحدها تظهر و لكن عند حسابها من الشريحة الأولى أو الثانية لا تظهر مرفق المثال finish (5).mdb
  18. أستاذى @أبو إبراهيم الغامدي الشريحة الثالثة لم تظهر
  19. أستاذى @أبو إبراهيم الغامدي عندتجربة حساب من 1-1-1990 حتى 1-1-1991 ظهر فى الشريحة الثانية -308 شهر عند تجربة حساب من 1-1-2021 حتى 1-1-2022 ظهر فى الشريحة الثانية - 4 شهر
×
×
  • اضف...

Important Information