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

omarahmed1424

03 عضو مميز
  • Posts

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

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

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

  1. السلام عليكم ورحمة الله وبركاته لو تكرمت ممكن البرنامج المقتبس منه التصميم او برنامج حضرتك كامل لان في أشياء لا تعمل في المثال وأحتاج البرنامج للعمل بالمدرسة عندنا وجزاكم الله خيرا وزادك من علمه وفضله
  2. السلام عليكم ورحمة الله وبركاته وبعد .... أ / حمدي كلي شوق لرؤية حسن إبداع تفكيركم و أناملكم كما عودتنا أرجو رفع نسخة للاطلاع على الأكواد وحسن تعاملكم معها وجزاكم الله خيرا
  3. السلام عليكم ورحمة الله وبركاته أرجو إرفاق الملف بعد هذه التعديلات التي وصلت لها لتسهيل حل المشكلة وجزاكم الله خيرا
  4. طيب لو محتاج يعرض لي النموذج كامل داخل الصفحة ممكن دي ولا لازم أعيد تصميم النموذج كامل داخل الصفحة ؟؟؟
  5. السلام عليكم ورحمة الله وبركاته وبعد في البرنامج أحتاج للبحث بين تاريخين ووقتين فأريد أن تكون القيمة الافتراضية لتاريخ البداية هو تاريخ اليوم ولكن بوقت ثابت والقيمة الثانية تكون الوقت و التاريخ الحالي وعند استخدام دالة now() تصلح للشق الثاني ولكن البداية لم أستطع مزج تاريخ اليوم مع وقت محدد ولين 08:00:00 ص مثلا فأرجو من الأخوة المساعدة في هذه المشكلة و جزاكم الله خيرا
  6. السلام عليكم ورحمة الله وبركاته وبعد ... لو تكرمت موقع شراء البرنامج لتشفير Qr وجزاكم الله خيرا
  7. السلام عليكم ورحمة الله وبركاته أستاذي العزيز مؤمن سالم لدي أسئلة وهي : 1 - هل الفاتورة الصادرة من الأكسيس تصلح لدى هيئة الزكاة والدخل أصلا ؟ 2 - هل تشترط الهيئة في المرحلة الحالية من التطبيق أن يكون البرنامج متصل بها ؟ 3 - كيف يمكن تشفير الQR كود إذا كانت الهيئة تطلب ذلك ؟ وجزاكم الله خيرا
  8. قريباً ولكن حدد الجزء الذي تريده الأن . السلام عليكم ورحمة الله وبركاته وبعد ... ما أحتاجه هو الجزء الظاهر في تجربة شريط القوائم من أدوات الاتصال المتنوعة على الجوال و على الواتس آب و تحويل الأرقام وغيرها من أدوات الاتصال الرائعة و جزاكم الله خيرا
  9. ممكن هذا الجزء من برنامج حضرتك لأن فيه أفكار كثيرة الجميع يحتاجها و جزاكم الله خيرا
  10. السلام عليكم ورحمة الله وبركاته وبعد .... لو تكرمت ممكن ملف معمول بهذه الطريقة الجميلة الراقية للتجربة و جزاكم الله خيرا
  11. السلام عليكم ورحمة الله وبركاته وبعد ... البرنامج لا يفتح معي ويدخل في دائرة مغلقة من عرض رسالة الخطأ ثم البدء من جديد وهكذا فما الحل ؟ وجزاكم الله خيرا
  12. السلام عليكم ورحمة الله وبركاته وبعد ... أخي العزيز أبا جودي وفقت اليوم من خلال التعديل إلى جعل الرمز أسرع في القراءة جدا من خلال التعديل على الوحدة النمطية modQRCode فجعلت عرض وطول الصورة 25 فقط بدلا من 200 و جعلت مستوى تعديل الأخطاء L بدلا من H كالتالي qrCodeOptions.Height = 25 qrCodeOptions.Width = 25 qrCodeOptions.CharacterSet = "UTF-8" qrCodeOptions.Margin = 1 qrCodeOptions.errorCorrection = ErrorCorrectionLevel_L وجزاكم الله خيرا على الرد والمتابعة
  13. مرفق كودين مختلفين الأول يقرأ بسهولة أما المتكون بطريقة العزيز أبي جودي فيقرأ بصعوبة أو لايقرأ ويلاحظ اختلاف الشكل جدل مع انها نفس البيانات أما إذا تم التكبير للوضع التالي فيقرأ بسهولة لكن يغطي على مساحة كبيرة من الفاتورة
  14. السلام عليكم ورحمة الله وبركاته وبعد... عزيزي أبا جودي المرفق عمل معي تماما لكن عندي مشكلةوهي أن الqr codeلدي يحمل معلومات كثيرة من الفاتورة ولذلك إذا صغرت حجم الصورة التي هيqr codeفي الفاتورة تتداخل ولا يتم قراءتها بالماسح كالمعتاد ولا يتم قراءتها إلا إذا كبرت qr code وفي هذه الحالة يطغىqr code على مساحة الفاتورة فهب هناك حل لهذه المشكلة و جزاكم الله خيرا
  15. السلام عليكم ورحمة الله وبركاته... هذه النسخة تجريبة فما تأثير ذلك على عملها سوى ظهور كلمة (تجريبية) عند مسح الكود. هل تتوقف بعد عدد معين مثلا أو لا يتم قراءة الكود. أرجو التوضيح و جزاكم الله خيرا
  16. حضرتك محتاج حاجة زي دي مثلا عندي فورم بدخل منه المواقف على الطلاب ( سلبي - إيجابي - غياب - تاخر ... ) ولابد من إغلاق الموقف وإنهاء التصرف مع الطالب و طبعا لابد من التذكير بوجود مواقف مفتوحة وده إللي بيعمله الكود ده Dim intStore As Integer intStore = DCount("[student_ser]", "[moqef_off]", "[moqef_off] =0 ") If intStore = 0 Then Exit Sub Else If MsgBox(" لديك " & intStore & " مواقف طلاب غير مغلقة " & _ "" & vbCrLf & vbCrLf & _ " " & _ "هل تود رؤيتهم الآن ؟ " & _ " ", vbYesNo Or vbExclamation Or vbDefaultButton1, _ "تنبيه مواقف طلاب مفتوحة") = vbYes Then DoCmd.Close acForm, "frmstudent", acSaveYes DoCmd.OpenForm "moqef_off", acNormal Else Exit Sub End If End If لأن الكود ده بيعد الرقم الكودي و المواقف المفتوحة الموازية للرقم الكودي للطلاب لما بيكون "[moqef_off] =0 " وبعدين بيديني رسالة بعدد المواقف المفتوحة زي ما هو واضح في الرسالة لإذا عاوز أكمل وأشوفهم تضغط نعم وإذا لو مش عايز بتضغط لا فيكمل النموذج الخاص بإدخال الطلاب الفتح وطبعا لو عاوز تشوفهم ده بيفتح نموذج تاني محطوط عليه باص ورود للفتح On Error Resume Next Dim X As String X = "1239" Dim Y As String Y = InputBoxDK("Enter Password for form") If X <> Y Then MsgBox ("Invalid password") DoCmd.CancelEvent End If وده طبعا غرضه حماية المواقف من التعديل إلا لمن له الصلاحية ولما النموذج بيفتح زي ما هو واضح في الصورة الأخير ممكن تطلع على الوضع وتحذف الموقف يارب أكون أفدت حضرتك
  17. تم إغلاق النسخة من المبرمج للأسف لم أستطع الاطلاع على البرنامج ما الفائدة من جعل البرنامج متاح لمدة يوم واحد ؟؟؟؟
  18. العضو المحترم د / كاف يار . السلام عليكم ورحمة الله وبركاته وبعد ... بصدق البرنامج أكثر من رائع - ما شاء الله - به أفكر كثيرة مرتبة ومنظمة . أسأل الله العظيم أن يجعل ما قدمت في ميزان حسناتك يوم القيامة . ولي رجاء عند حضرتك ألا تحرمنا من هذه الإبداعات دوما . وجزاكم الله خيرا
×
×
  • اضف...

Important Information