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

ابو ياسين المشولي

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

  • Posts

    1,752

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

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

  • Days Won

    24

 نوع المحتوي 

كل منشورات العضو ابو ياسين المشولي

  1. ابو ياسين المشولي
    بعد اذنك اخي شيفان اظنه قال اذا وجد الصنف يضاف له اللي في النموذج بيكون هكذا StrSql = "UPDATE Alsnaf SET Alsnaf.Sanf =[Forms]![ÇÝÊÊÇÍí]![Sanf], Alsnaf.rsdaolalmdh =rsdaolalmdh+ [Forms]![ÇÝÊÊÇÍí]![rsdaolalmdh]WHERE (((Alsnaf.ID_Sanf)=[Forms]![ÇÝÊÊÇÍí]![ID_Sanf]));"
  2. ابو ياسين المشولي
    والمشكله انه كل اوفيس وله رقم 10 يعني 2003 12 يعني 2007 14 يعني 2010
  3. ابو ياسين المشولي
    انا جربت هذا شوفه واعطيني خبر SandAll5.rar
  4. ابو ياسين المشولي
    لم الاحظ اي خلل فيما قلت
  5. ابو ياسين المشولي
    لم تجي بجديد الملف اللي ارفقته هو نفس الملف اللي انا ارفقته انت لو ركزت انا غيرت تقريرك واستبدلت بتقرير جديد
  6. ابو ياسين المشولي
    بالتوفيق والحمدلله انك وصلت للحل
  7. ابو ياسين المشولي
    هنا اضفت اكثر من 8 مكتبات Database25.accdb
  8. ابو ياسين المشولي
    جرب هذا Me.Frm1.SetFocus DoCmd.GoToRecord , , acLast واذا اردت التسجيل باخر حقل بيكون هكذا Me.Frm1.SetFocus DoCmd.GoToRecord , , acLast DoCmd.GoToRecord , , acNext
  9. ابو ياسين المشولي
    هذا ما قدرت اوصل له لعل احد الاخوه يفيدك
  10. ابو ياسين المشولي
    اتفضل test951159.mdb
  11. ابو ياسين المشولي
    بالتوفيق اخي
  12. ابو ياسين المشولي
    اتفضل [Forms]![SandExpense_F].Refresh [Forms]![SandExpense_F]![Amount] = [Forms]![SandExpense_F]![ExpenseDate_Sub]![Total1] [Forms]![SandExpense_F]![Amount].Requery Me.Refresh Total1.Requery Me.notes.SetFocus
  13. ابو ياسين المشولي
    Me.Requery [Forms]![SandExpense_F]![Amount] = [Forms]![SandExpense_F]![ExpenseDate_Sub]![Total1] Me.Refresh هذا لتحديث الاجمالي
  14. ابو ياسين المشولي
    للرفع
  15. ابو ياسين المشولي
    في حدث عند الفتح docmd.Maximiz
  16. ابو ياسين المشولي
    اكتب امري طباعة لكل تقرير على حدة في نفس حدث الزر
  17. ابو ياسين المشولي
    استبدل DoCmd.CancelEvent بهذا Exit Sub
  18. ابو ياسين المشولي
    جرب هذا If IsNull(DLookup("[Sanf]", "Alsnaf", "[ID_Sanf]='" & Me.ID_Sanf & "'")) Then MsgBox " المـعـذرة يـرجـاء الـتـأكـد .... لا تـو جـد صـنـف بـهـذا الـرقـم ", vbInformation, "رساله" DoCmd.CancelEvent End If
  19. ابو ياسين المشولي
    بالتوفيق اول كتبته بالمبايل فعكس الاقواس هههههه تحياتي لك
  20. ابو ياسين المشولي
    بعتذر انا اخطائت If Not IsNull(Me.n12) Then
  21. ابو ياسين المشولي
    حاول هكذا if (not null)me.n12 then
  22. ابو ياسين المشولي
    اذا كان هذا طلبك فالله المستعان انت قلت لاتريدها تتكرر الاصناف وانا عملت لك كما طلبت وهذا اللي عملته انت هو استعلام الحاق ماله صله بالنموذج اما بالنسبه للرقم فهو عند فتح النموذج هو يضيف سطر على العموم بالتوفيق اهم شي انك توصلت للحل
  23. ابو ياسين المشولي
    بارك الله فيك استاذي ابو خليل
  24. ابو ياسين المشولي
    اتمنى يكون المطلوب الاصناف (1).accdb
  25. ابو ياسين المشولي
    اعتقد عندك اخطاء في ادخال البينات لاحظ الجدول لم تجد فيه شي اسمه سند المالك
×
×
  • اضف...

Important Information

  I accept