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

اخي خالد اعمل قاعدة جديدة واستورد الجداول والاستعلامات واحذف البينات فقط خلي كم حقل وارفع ملفك حتى نعرف المشكلة

بالتوفيق اخي qathi نحن بالخدمه بما نستطيع

طبعا الكود ماخوذ من الاخ محمد القاضي qathi الله يذكرة بالخير benyasien.rar

يحذف المسار اللي في الجدول

مي هي الحقل اللي في النموذج وبدونها قد تكون موجودة في النموذج وفي الجدول ومي تعرفه انه هذا الحقلي اللي في النموذج وكلهما يشتغلان

مشاركة مع اخي ابو جودي ضيف هذا بعد الرساله DoCmd.SetWarnings False DoCmd.RunSQL "DELETE tbl.* FROM tbl where ID = [Forms]![frmA]![ID];" DoCmd.SetWarnings True

ارسل رساله خاصه

اعمل شرط بالفواتير المسدده او حاول ترفع التقرير مع الاستعلامات والجداوال اللي ياخذ منها الستعلامات حتى توضح المشكلة

خلي مصدر بيانات التقرير من استعلام التوحيد اللذي تم تمج استعلامين فيه

العفو اخي Barna

تسلم اخي ابو زاهر نحن في الخدمه

لا لازم تشغله منفصل كمسئول لانه bat

نعم استاذي كل المكنبات بمختلف انواعها

جرب شغلbenyasien كمسئول benyasien.rar

فعلا يستحق وبجدارة الف الف مبروك اخي حسين تستاهل

بارك الله فيك اخي حلبي ولك بالمثل بالتوفيق

جرب هكذا هنا اسم اليوم والتاريخ dd/ddd/mmm/yy وهنا التاريخ +th dd/"th"/mmm/yy date.mdb

ابشر اخي ابا جودى ولايهمك شوف الان Database21.accdb

شوف هذا Database21.accdb

اتفضل عن طريق الكود هذا Dim varFilter As Variant varFilter = Null If Not IsNull(Me.X) Then varFilter = "[nume] LIKE '*" & Me.X & "*'" End If ' كود البحث بين تاريخين If Not IsNull(Me.STR) Or IsNull(Me.IND) Then varFilter = (varFilter + " AND ") & "[dateTraining] Between STR And IND" End If With Me.frmsub.Form If Not IsNull(varFilter) Then .DataEntry = False .Filter = varFilter .FilterOn = True Else .FilterOn = False End If .Requery End With Database21.accdb

الله يحفظك اخي حربي العنزي

اتفضل اوفسنا.accdb

كما قلت لك هكذا =Nz([نص176]+[total]-[Amount];"0")

اذا كان بالحسابات فافضل داله هي nz وهذا مثال nz([b1]+[b2]+[b3];"o") جرب وشوف

وهذه فكرة اخرى ممكن تعملها في التقرير اذا حبيت تطبعها مقارنه السعر بين موردين.accdb