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

شكرا لك اخي على الملف انا الان ليس مشكله بالملف المشكله بالاكواد كيف اطبقها على موقع الرسايل

الحمد لله الذي بفضله تتم الصالحات بالتوفيق اخي

هو المطلوب ربط الموقع بالاكسس

اتفضل اتمنى يكون المطلوب SeashError & rpt.accdb

بالتوفيق اخي كنت اريدك تدخل اكثر من اسم عميل واسم مورد لاني شاكك في داله دولكب انها تختار اخر اسم اريدك تجرب اكثر من زبون واكثر من مورد

انا المفروض كنت احذفه انا اصلا اشنغلت على الاستعلام كي اعمله في التقرير الاستعلام اصبح وجوده مثل عدمه

بارك الله فيك ورحم والديك جعلت مصدر التقرير هكذا SELECT InvoiceTT.InvoiceNum, InvoiceTT.Movement, ItemsT.ItemName, InvoiceTT.OutDate, InvoiceTT.QuantityS, InvoiceTT.priceu, InvoiceTT.Total, InvoiceTT.Times, ItemsABT.ItemABName, IIf([Movement]="بيع",DLookUp("[CustomerName]","[CustomersT]"),IIf([Movement]="شراء",DLookUp("[SupplierName]","[SuppliersT]"))) AS Expr5 FROM ItemsABT INNER JOIN (ItemsT INNER JOIN InvoiceTT ON ItemsT.ItemID = InvoiceTT.ItemId) ON ItemsABT.ItemABID = ItemsT.ItemABID; وعملت شرط عند فتحت التقرير هكذا If [Forms]![ItemsKashf_F]![k2] = "شراء" Then Me.txetCustom.Caption = "اسم المورد?" End If If IsNull([Forms]![ItemsKashf_F]![k2]) Then Me.txetCustom.Caption = "عميل أو مورد" End If

للرفع أبو إبراهيم الغامدي

اتفضل هذا طلبك ب3 شروط SeashError & rpt.rar

انا عملت في التقرير عند الفتح If [Forms]![ItemsKashf_F]![k2] = "شراء" Then Me.تسمية59.Caption = "اسم المورد" End If

انت لم تلاحظ انه اذا بيع يكون الاسم اسم الزبون زاذا شراء يتغير الاسم الى اسم المورد

=IIf([Forms]![ItemsKashf_F]![k2]="بيع";[Forms]![ItemsKashf_F]![itemsKashf_Sub].[Form]![CustomerNum];IIf([Forms]![ItemsKashf_F]![k2]="شراء";[Forms]![ItemsKashf_F]![itemsKashf_Sub].[Form]![SuppliersNum])) لم اشوف ملفك الاخير ولكن شوف هذا اظنك تريد توصل الى هذا جرب واعطيني خبر SeashError & rpt.rar

جرب هذا =[Forms]![ItemsKashf_F]![itemsKashf_Sub].[Form]![CustomerNum]

بارك الله فيك وزاد علم فوق علمك

بارك الله فيك وانا اقول اني متاكد من الكود ولكن ما عرفت فين المشكله معلومه جدا مهمه تسلم اخي Shivan Rekany

اخي Shivan Rekany ما قمت به هو نفس النتيجه ما قمت به انا وهو ليس الملوب اعمل 30 30 80 وتحت 100 بتلاقي يعمل شرط 30 وهو يريده يعمل شرط 80

ممكن ترفق ما توصل اليه مع شرح المطلوب

جرب هذا =IIf([k2]<=[rx] And [k2]<[rx2];[rx]*[k2];IIf([k2]>[fx] And [k2]<[rx3];[rx2]*[k2];IIf([k2]>=[fx3];[rx3]*[k2])))

=IIf([k2]<=[fx];[rx]*[k2];IIf([k2]>=[fx2];[k2]*[rx2];[rx3]*[k2])) حاول تضيف قبل الاخير if

انا الان في المبايل جرب اضافهif

اتفضل ارجو يكون المطلوب هذا حسب فهمي لمطلبك SeashError.rar

جرب هذا =IIf([k2]<=[fx];[rx]*[k2];IIf([k2]>=[fx2];[k2]*[rx2];[rx3]*[k2]))

بالتوفيق اخي

لازم كنت تعمل بدل ItemName تجميع على العموم عدلت لك شوفه واعطيني خبر طارق (2).accdb

حمل الملف مرة اخرى شوف عندي انا ماطلع شي