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

kanory

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

  • Posts

    2375

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

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

  • Days Won

    140

 نوع المحتوي 

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

  1. kanory
    مزيد من المعلومات حول ""
    ضع هذا الكود بدل الموجود لديك ..... On Error Resume Next Dim resbtndelete As String resdelete = MsgBox("هل تريد حذف المنتج ؟", vbYesNo, "تنبيه") If resbtndelete = vbYes Then DoCmd.SetWarnings False DoCmd.RunSQL "DELETE tbl_Fatoora2.ID_Haraka, tbl_Fatoora2.Product_Name_Haraka " & _ " FROM tbl_Fatoora2 " & _ " WHERE (((tbl_Fatoora2.ID_Haraka)=[forms]![frm_Fatoorabuy]![Invoice_ID]) AND ((tbl_Fatoora2.Product_Name_Haraka)=[Forms]![frm_Fatoorabuy]![w1].[Form]![Product_Name_Haraka]));" DoCmd.SetWarnings True 'DoCmd.RunSQL ("delete * from tbl_fatoora2 where [ID_Haraka]=" & Forms!frm_Fatoorabuy!Invoice_ID) DoCmd.Requery End If
  2. kanory
    هذا المثال مبسط لفهم الفكرة ..... Fatoorh2000.mdb
  3. kanory
    بارك الله فيك وبالتوفيق .....
  4. kanory
    وهذه مشاركة بطريقة اخرى مع الاساتذة الكرام <<<<<<<>>>>>>> 1678743215_.accdb
  5. kanory
    كود اخي الوزير يعمل بكفاءة .... كيف لا يصفي الباركود ؟؟؟؟؟؟؟
  6. kanory
    هكذا <<<<<>>>>>> DoCmd.OpenReport "rpt_class", acViewPreview, , "class Like '*" & Me.lst4.Column(1) & "*' AND class Like '*" & Me.lst4.Column(1) & "*'" دائما الشروط تكتب بين علامتي تنصيص انظر للكود بعد تفريغ الشرطين يصبح هكذا DoCmd.OpenReport "rpt_class", acViewPreview, , "هنا بكتب جميع الشروط والمعاريير" وهذا شكل الشرطين class Like '*" & Me.lst4.Column(1) & "*' AND class Like '*" & Me.lst4.Column(1) & "*'
  7. kanory
    بالعكس النتيجة شغال في الحالتين ..... فقط تأكد من اسم الجدول المرتبط .....
  8. kanory
    جميل اخي الكريم ....ز
  9. kanory
    الموضوع مكرر أخي الكريم ... نصيحة : لا تكرر الموضوع ... فقط اكتب للرفع في نفس الموضوع ..... ثانيا لو ارفقت مثال مبسط لوجدت الاجابة من الاساتذة في المنتدى ....
  10. kanory
    بارك الله فيك ...... بالتوفيق ,,,,,,,
  11. kanory
    شركة واحدة فقط ....
  12. kanory
    بالنسبة للنقطة الاولى ... نعم ولكن اعتقد هناك طرق اخرى النقطة الثانية ممكن في التقرير الفرعي وممكن في التقرير المجمع ....
  13. kanory
    مثل هذا <<<<<<<>>>>>>> split.accdb
  14. kanory
    في حدث عند النقر المزدوج لـــــ lst4 ضع هذا الكود <<<<<<<>>>>>>> DoCmd.OpenReport "rpt_class", acViewPreview, , "class Like '*" & Me.lst4.Column(1) & "*'"
  15. kanory
    لاحظ الفرق بين ظهور الصف الاول من التقرير والصف الثاني من حيث السرعة !!!!! Nouveau Microsoft Access Database.accdb
  16. kanory
    حياك الله أبو زهرة ..... بارك الله فيك ... New Microsoft Access Database.rar
  17. kanory
    استخدم شيك بكس .....
  18. kanory
    بل VB افضل من حيث الحماية واخفاء ما تريد حمايتة وخاصة في مثالك تريد عدم التعديل الا برقم سري ..... لان الماكروا حتى بعد حماية القاعدة وتحويلها mde يمكن الاطلاع عليها وتعديلها
  19. kanory
    تفضل <<<<<<<>>>>>>> transport (3) (1).accdb
  20. kanory
    فاضية ؟؟؟؟؟؟؟ تقصد بيضاء بدل الصفر ..... صحيح ؟
  21. kanory
    متوافق اخي مع معظم النسخ ..... حاول فتح الموضوع السابق وطبق الشرحات بها حتى يعمل معك أو اضغط على Shift باستمرار مع تشغيل الملف ثم شغل النماذج من داخل البرنامج ...
  22. kanory
    تفضل <<<<<>>>>> v2016_183.zip
  23. kanory
    ليس لديك سجل به اصفار ولكن لديك بعض الحقول اصفار .....
  24. kanory
    انظر هنا <<<<<<<>>>>>>>>
  25. kanory
    اعتقد رأيت اداة كانت مصممة بالاكسس يمكن من خلالة تغيير مسمى مثلا حقل في جدول فتقوم الاداة بتغييرة في جميع البرنامج سواء في اكواد او استعلامات او نماذج او تقارير او وحدات نمطيه ..... يعني تغيير كامل في البرنامج باكمله ..... سوف ابحث عنه اذا تيسر ارفقه هنا ان شاء الله تعالى ....
×
×
  • اضف...

Important Information

  I accept