منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] ارجوا توضيح المشكلة بعد عملية الحفظ - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] ارجوا توضيح المشكلة بعد عملية الحفظ (/showthread.php?tid=18841)

ارجوا توضيح المشكلة بعد عملية الحفظ - أبووسم - 17-01-17

السلام عليكم

بعد عملية الحفظ يظهر لي الخطأ التالي



RE: ارجوا توضيح المشكلة بعد عملية الحفظ - thevirus - 18-01-17

لازم تسوي قبل كل ()TextBox.DataBindings.Add
الكود التالي() TextBox.DataBindings.Clear

RE: ارجوا توضيح المشكلة بعد عملية الحفظ - مساعدة - 18-01-17

السلام عليكم

الأفضل تعمل DataBindings في الحدث Form_Load فقط لضمان عدم محاولة إضافتها مرة أخرى والذي يتسبب بالخطأ كما في الموضوع،
وإلا اعمل DataBindings.Clear لكل TextBox مثل ما ذكر الأستاذ.

RE: ارجوا توضيح المشكلة بعد عملية الحفظ - أبووسم - 19-01-17

عملت المطلوب و ما ضبطت معي

المشكلة انها تتم عملية الحفظ و لكن يظهر لي الخطأ ، وعند إغلاق البرنامج و تشغيلة اجد المعلومات قد أضيفت للبرنامج



RE: ارجوا توضيح المشكلة بعد عملية الحفظ - thevirus - 19-01-17

(19-01-17, 12:03 PM)أبووسم كتب : عملت المطلوب و ما ضبطت معي

المشكلة انها تتم عملية الحفظ و لكن يظهر لي الخطأ ، وعند إغلاق البرنامج و تشغيلة اجد المعلومات قد أضيفت للبرنامج


جرب هذا الكود تسوي دالتين جديتين كالاتي
كود :
Private Sub txtDataBindinds()
TextBox1.DataBindings.Clear()
TextBox2.DataBindings.Clear()
TextBox3.DataBindings.Clear()
TextBox4.DataBindings.Clear()
TextBox5.DataBindings.Clear()
TextBox6.DataBindings.Clear()
TextBox8.DataBindings.Clear()
TextBox9.DataBindings.Clear()
TextBox10.DataBindings.Clear()
PictureBox.DataBindings.Clear()
TextBox1.DataBindings.Add("Text",ds"Employees.EName")
TextBox2.DataBindings.Add("Text",ds"Employees.Mrtb")
TextBox3.DataBindings.Add("Text",ds"Employees.ID_1")
TextBox4.DataBindings.Add("Text",ds"Employees.ID2")
TextBox5.DataBindings.Add("Text",ds"Employees.ID3")
TextBox6.DataBindings.Add("Text",ds"Employees.City")
TextBox7.DataBindings.Add("Text",ds"Employees.Town")
TextBox8.DataBindings.Add("Text",ds"Employees.DAte1")
TextBox9.DataBindings.Add("Text",ds"Employees.Date2")
TextBox10.DataBindings.Add("Text",ds"Employees.Sco")
PictureBox.DataBindings.Add("Image",ds,"Employees.Photo",True,DataSourceUpdateMode.OnPropertyChanged)
End Sub
الدالة الثانية

PHP كود :
Private Sub loadData ()
Dim da As new OleDbDataAdapter("Select * From Employees",Con)
Dim ds As New DataSet
ds.Clear()
Da.Fill(ds,"Employees")
End Sub 

وفي حدث التحميل (Form_Load)
قم بإستعداء الدالتين لكن يجب عليك الانتباه على الترتيب 
اي 
في حدث الفورم Load 
كود :
loadData()
txtDataBindings()
 أما سبب الخطأ السابق هو انك لازم تعمل Clear لكل كنترول قمت بربطه بالداتاست

RE: ارجوا توضيح المشكلة بعد عملية الحفظ - أبووسم - 19-01-17

اخي الكريم ممكن تتفضل بعد اذنك تعدل لي المشروع ، المشكلة في التعديل و الحفظ

RE: ارجوا توضيح المشكلة بعد عملية الحفظ - tryold - 20-01-17

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

على العموم تم التعديل

RE: ارجوا توضيح المشكلة بعد عملية الحفظ - أبووسم - 21-01-17

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