[elgokr]

بخصوص الجزؤ الاول الخاص بجمع الفواتير ليعرض الفواتير

اذا كان هذا ما تقصده كما فى الصورة التالية


كل ما عليك استخدام كود الاستعلام بهذه الطريقة

كود :

SELECT
   T1.ID_ORDERS
   , MAX(T2.ODERS_DATE) AS ODERS_DATE
   , MAX(T2.DIS_ORDER) AS DIS_ORDER
   , MAX(T2.ID_MU) AS ID_MU
   , MAX(T2.ID_CU) AS ID_CU
   , SUM(T1.QYT) AS QYT
   , SUM(T1.PRICE) AS PRICE
   , SUM(T1.AMONT) AS AMONT
FROM
   order_dtl AS T1
   INNER JOIN tb_orders AS T2
       ON (T1.ID_ORDERS = T2.ID_ORDERS)
   GROUP BY T1.ID_ORDERS;

بخصوص زر التعديل

فى البداية السطر الخاص بالاستعلام داخل الزر وهو

كود :

"Select * From mem ,tb_orders Where mem.C_NAME = tb_orders.ID_CU and tb_orders.ID_ORDERS= " & DGV_tb_orders.CurrentRow.Cells(0).Value

استبدله بهذا الكود

كود :

"SELECT
   T1.*
   , T2.*
FROM
   mem AS T1
   INNER JOIN tb_orders AS T2
       ON (T1.C_NAME = T2.ID_CU)
WHERE T2.ID_ORDERS = " & DGV_tb_orders.CurrentRow.Cells(0).Value

بخصوص كود الاستعلام الخاص بـ

كود :

"Select * From mu ,tb_orders Where mu.MU_NAME = tb_orders.ID_MU and tb_orders.ID_ORDERS= " & DGV_tb_orders.CurrentRow.Cells(0).Value

استبدله بهذا الكود

كود :

"SELECT
   T1.*,
   T2.*
FROM
   mu AS T1
   INNER JOIN tb_orders AS T2
       ON (T1.MU_NAME = T2.ID_MU)
WHERE T2.ID_ORDERS =  " & DGV_tb_orders.CurrentRow.Cells(0).Value

بخصوص البيانات الفاتورة فى الفورم

انت كل ما استخدمته لعرض البيانات الاكواد التالية فى الزر

كود :

           frm.TextBoT.Text = dr("ID_C").ToString
           frm.TextBN.Text = dr("C_NAME").ToString
           frm.TextBP.Text = dr("C_PHONE").ToString

عبارة عن ( تسلسل العميل - اسم العميل - رقم هاتف العميل )

وايضاً

كود :

frm.TextBoNAMEMU.Text = dr("MU_NAME").ToString

عبارة عن ( اسم المندوب )

ناتى الى الجزء الاخير وهو عرض الفواتير

بخصوص كود الاستعلام الخاص بـ

كود :

"Select itemes_.ID_I,itemes_.NAMR_IT,order_dtl.QYT,order_dtl.PRICE,order_dtl.AMONT From itemes_ ,order_dtl Where itemes_.ID_I = order_dtl.ID_PRO And order_dtl.ID_ORDERS =" & DGV_tb_orders.CurrentRow.Cells(0).Value

استبدله بهذا الكود

كود :

"SELECT
   T1.ID_I,
   T1.NAMR_IT,
   T2.QYT,
   T2.PRICE,
   T2.AMONT
FROM
   itemes_ AS T1
   INNER JOIN order_dtl AS T2
       ON (T1.CODE_IT = T2.ID_PRO)
WHERE T2.ID_ORDERS=" & DGV_tb_orders.CurrentRow.Cells(0).Value

السبب عدم عرض اى نتائج كما فى الصورة

هو انك قمت بعمل التالى

كود :

Where itemes_.ID_I = order_dtl.ID_PRO

والصح انه يكون بهذا الشكل

كود :

Where itemes_.CODE_IT = order_dtl.ID_PRO

اتمنى اكون بسط فى الشرح

وان يكون جميع ما كنت تريده قد تم

تحياتى لك

وتمنياتى لك التوفيق