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

kanory

الخبراء
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    2367

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

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

  • Days Won

    140

 نوع المحتوي 

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

  1. kanory
    هناك علاقة موجودة بين الجدولين هي تمنع التحديث لذلك طبق حسب الصورة ثم اعد تلك العلاقة بعد الترحيل مرة اخرى احذف العلاقة رقم 1 كون العلاقة رقم 2 انشأ التحديث رقم 3 شغل الاستعلام ليتم تحديث بيانات الجدول istimaraall ثم اعد العلاقة رقم 1 مرة اخرى
  2. kanory
    ماهي الرسالة التي تظهر صور لنا تلك الرسالة
  3. kanory
    اكتب هذا الكود If IsNull(Texte8) Or Me.Texte8 = "" Then " اكتب الاسم "MsgBox DoCmd.CancelEvent Else DoCmd.OpenReport "mouv", acViewReport End If
  4. kanory
    لا يوجد لدي جهاز حاليا فيه 64 بت ولكن جرب هذا ..... Kan.accdb
  5. kanory
    تفضل أخي الكريم .... Kan.accdb
  6. kanory
    أولا هل هذا النموذج الذي ذكرنه يعمل بمفردة أي هو نموذج أم نموذج فرعي ضمن نموذج اخر ثانيا ماذا تقصد بالرقم في هذه الصورة وهل هو ضروري بالنسبة لك ثالثا اخي هل انت مصمم البرنامج .... اذا كان نعم فرجاء خاص ابتعد عن تسمية الكائنات باسماء محجوزة للاكسس بارك الله فيك .....
  7. kanory
    في الموقع الكثير من امثل النسخ الاحتياطي أبحث تجد ما يسرك أخي الكريم
  8. kanory
    حياك الله
  9. kanory
    تفضل --------->>>>> يوميات.accdb
  10. kanory
    تفضل ----------->>> moh-21.rar
  11. kanory
    انظر المرفق ووافينا بالنتيجة --------------->>>>>> moh-2.rar
  12. kanory
    استخدمنا هذا الكود في حدث الحالي وايضا عند تحديث الصنف في النموذج الفرعي !!!! Forms!buy!Command17.Enabled = Forms!buy!buy_sub.Form.Recordset.RecordCount > 0
  13. kanory
    تفضل --------->>>>>> copy_kan.accdb
  14. kanory
    الحمد لله رب العالمين ..... حياك الله
  15. kanory
    تفضل -------->>>>>>> ex.accdb
  16. kanory
    الحمد لله رب العالمين .... حياك الله
  17. kanory
    اغلق البرنامج من شريط مهام الكمبيوتر .... ثم شغل البرنامج مرة اخرى بالضغط على شيفت
  18. kanory
    ما هو الداعي لفتح النموذجين في آن واحد ؟؟؟
  19. kanory
    انظر الصور وطبق ..... ثم ضع هذا الكود في مصدر الكمبو ---------->>>>>> SELECT * FROM (SELECT Table1.main_unit FROM Table1) AS1 UNION SELECT * FROM (SELECT Table1.med_unit FROM Table1) 2; ولكن سؤال لماذا حذفت اسماء السلع ؟؟؟؟ كيف تعرف وتفرق بين السلع عن زيادتها عن اكثر من اربعة سلع وكلها بالكيلو مثلا ؟؟ والخيار لك في النهاية !!
  20. kanory
    في مصدر عنصر التحكم لمربع النص ضع هذا ..... =DLookUp("[xxx]";"x1")
  21. kanory
    ضع هذا الكود تحت حدث الزر On Error GoTo Err_أمر0_Click Dim X X = CurrentProject.Path & "\" & CurrentProject.Name DoCmd.TransferDatabase acExport, "Microsoft Access", X, acTable, "تأجير شقة", "نسخة من تأجير شقة", False MsgBox "تم نسخ الجدول ", vbOKOnly, "تأكيد" Exit_أمر0_Click: Exit Sub Err_أمر0_Click: Resume Next
  22. kanory
    استبدل مصدر الصف في الكمبو بهذا SELECT * FROM (SELECT Table1.item, Table1.main_unit FROM Table1) AS kan UNION SELECT * FROM (SELECT Table1.item, Table1.med_unit FROM Table1) AS kan1;
  23. kanory
    سطرين ؟؟؟؟؟ قصدق سجلين مثل هذا ؟؟؟
  24. kanory
    انظر الصور وطبق ..... combobox1.accdb
  25. kanory
    الحمد لله رب العالمين
×
×
  • اضف...

Important Information

  I accept