[atef_020]

(20-07-18, 05:32 PM)elgokr كتب :

(20-07-18, 03:27 PM)atef_020 كتب :

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

فى البداية قم بالتعديل على الكود لتجعله كما فى الصورة

الكود المستخدم

كود :

           Dim DS As New DataSet
           '=========== ربط تفاصيل الفاتورة =============
           DA = New OleDb.OleDbDataAdapter("SELECT * FROM Sell_Detl WHERE BUYCODE = val('" & CODE_ & "')", CON)
           DS = New DataSet
           DA.Fill(DS)
           DT = DS.Tables(0)
           dgv.DataSource = DT
           BUTTDELETE.Enabled = True
           BUTTSAVE.Enabled = False

ثانياً بعد اتمام التعديل كما فى الصورة

عند فتح شاشة (FrSell)

عند الضغط على زر بحث

عند اتمام الضغط على زر عرض لاى رقم فاتورة

اتمنى ان توضيح استخدام الكود

والصورة الموضحة بالشرح يكون موضح حل المشكلة

تحياتى لك

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

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

قمت بتعديل قاعدة البيانات من جديد 

   

وقمت باضافة التعديل كما يظهر بالصورة 

   

ولكن النتيجة كما هى لا يظهر لا راس الفاتورة ولا تفاصيلها 

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

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

وجزاك الله عنا خيرا