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

Eng.Qassim

الخبراء
  • Posts

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

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

  • Days Won

    22

كل منشورات العضو Eng.Qassim

  1. انا اسف على عدم الاستمرار ....بسبب حالتي الصحية بس طالما موجود الاخ @ابو عارف والاخ @Foksh الامور ماشية والحمد لله
  2. وعليكم السلام ... قبل الدخول في تفاصيل البرنامج قم بتنزيل وتثبيت خط الباركود (على سبيل المثال، Code 128 أو Code 39). ثم ارفع ملفك للتعديل عليه ... وبالمناسبة لو انك استخدمت البحث في الموقع ستجد الكثير من المواضيع خاصة بالباركود
  3. وعليكم السلام هل هذا ماتريده ؟
  4. مشاركة مع اساتذتي الكرام @ناقل & @أبوبسمله ملاحظة: الطريقة التي ارفقتها محددة جدا...لايمكنك تغيير الاسعار مستقبلا رغم اني افضل عمل جدول بالاسعار للاصناف مرتبط بالشركات او الزبائن تحسبا لتغير الاسعر كل فترة Test_2k.rar
  5. وعليكم السلام تفضل التعديل ...كلمة السر 1234 ...يمكنك تغييرها ops.rar
  6. طالما ان الرسالة لا تظهر عندك ..اغلب الظن المشكلة في نسخة الاوفيس
  7. طيب اخي ...لنجرب هذا الكود لقراءة picture property لديك If IsNull(Me.Image.Picture) Or Me.Image.Picture = "" Or Me.Image.Picture = "(none)" Then MsgBox "Picture Property: " & Nz(Me.Image.Picture, "(Null)") سوف تظهر لك رسالة لقراءة الخصائص ...بين لنا ماهي؟
  8. طيب ..جرب هذا السطر If IsNull(Me.Image.Picture) Or Me.Image.Picture = "" Or Me.Image.Picture = "(لا يوجد)" Then
  9. محاولة اخيرة.... ضع العلامة الحمراء كما مبين في الصورة ..واضغط على زر تحديث..واضغط على f8 ...ضع المؤشر كما في الصورة ماذا تظهر لك الجملة او السطر ؟
  10. سنحاول try & error جرب السطر التالي ..لان نسختي بالانكليزي If IsNull(Me.Image.Picture) Or Me.Image.Picture = "" Or Me.Image.Picture = "(none)" Or Me.Image.Picture = "(بلا)" Then
  11. ممكن تاخذ لي صورة لخصائص ال Image لديك
  12. في خصائص ال Image هل لديك كما في الصورة؟
  13. سارفع الملف بدون مجلد الصور Database.accdb
  14. هو يحذف الملاحظة 1 عندي !! ربما اصبح خطأ معين ... على كل حال الصق هذا الكود لديك Private Sub Command5_Click() On Error GoTo ErrorHandler If IsNull(Me.Image.Picture) Or Me.Image.Picture = "" Or Me.Image.Picture = "(none)" Then Me.Note1 = Null Else Me.Note2 = Null End If Exit Sub ErrorHandler: MsgBox "An error occurred: " & Err.Description, vbCritical, "Error" End Sub
  15. وعليكم السلام .. تفضل اخي موقف طبي.rar
  16. عزيزي استاذ @Tarekfathallah ارجوا علمكم بأن النموذج الموجود في الملف هو لادخال البيانات اليومية .. اما طلبكم في اظهار المعاش والاعطال فذلك فيه حديث اخر ويحتاج الى نموذج اخر خاص بهذا المطلب.. لان المعاش يعتمد على كل شهر يمكنني اظهار المعاش في نفس النموذج لكتتي غير مقنع منه.. ان مكنتني صحتي سوف اكمل ما طلبته ...وبالمناسبة فان جدول T_EMPLOYEE لايعمل وهو ضروري حاول معالجة ملفك.. احترامي وتقديري لك
  17. لقد اجبتك عن الجزئيات المطلوبة منك افتح صفحة جديدة وجرب... واخبرني النتيجة CODE HR (1).rar
  18. وعليكم السلام عملت لك استعلام attendance query يمكنك عمل نموذج مستمر ويكون الاستعلام مصدر بياناته ... كل ما علي ان ان تعمل combobox للموضف واخر للمشروع ..يقومون بعمل تصفية للبيانات في النموذج CODE HR.rar
  19. طبعا لاني اتوه في المسميات ...اختصرت الجداول والحقول التي تريدها...وانت احتار في البقية 😂 عملت لك دالة تقوم بتحديث البيانات من الجدولين.. افتح النموذج واضغط على الزر.. ولزيادة الفائدة عملت لك استعلامين تحديث ..اذا اردت استخدامهم سؤالي هو مافائدة السنة والشهر في النموذج فليس لهم علاقة بالتحديث تحديث بيانات جدول .accdb
  20. اخي ومعلمي الغالي @أبوبسمله غلبتني والله بأستخدامك ال UNION راحت عن بالي...على كل حال زيادة الخير خيرين لاني كنت اظن ان القائمة المنسدلة تبحث في بيانات واحدة انا عن نفسي اعطيك اجابة جيدة بعد اذن الاخ @محمد التميمي
  21. بالطبع لايظهر شيء اذا كانت البيانات فارغة ...او لديك مشكلة في ربط الجداول ثم انه لايمكنك الاضافة اذا كان لديك اكثر من جدول مرتبط في استعلام
  22. هذه محاولة ..ربما تستفيد منها مربع النص يبحث عن الاحرف الاولى او الاولى والثانية البيانات.rar
×
×
  • اضف...

Important Information