+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (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=25011)
RE: مشكلة بزر التعديل - mrnooo2000 - 19-05-18
من واقع خبرتى السابقة مع الأكسس الباراميترات التى تحمل أسماء لا تعمل عادة
و لكن يمكن التغلب على ذلك بشكل بسيط بالاستعاضة عنها بعلامات استفهام كما فى هذا الكود
كود :
.CommandText = "UPDATE BIBLIOTHEQUE SET [ISM_AWWAL]= ? ,[ISM_THANI]= ?,[ISM_THOLATHI]= ?,[DATE_OF_BIRTH]= ?,[LOCALITY_OF_BIRTH]= ?,[PERSONAL_PHONE]= ?,[ADRESS]= ? WHERE [ID] = ?"و لكن فى هذه الحالة سيكون عليك مراعاة ترتيب إضافة الباراميترات
لذلك سنقوم بنقل السطر الخاص بحقل الرقم المسلسل الى اخر سطر لأنه اخر باراميتر يظهر فى الكود
كود :
.Parameters.Add("@ISM_AWWAL", OleDbType.VarChar).Value = TextBox2.Text
.Parameters.Add("@ISM_THANI", OleDbType.VarChar).Value = TextBox3.Text
.Parameters.Add("@ISM_THOLATHI", OleDbType.VarChar).Value = TextBox4.Text
.Parameters.Add("@DATE_OF_BIRTH", OleDbType.VarChar).Value = TextBox5.Text
.Parameters.Add("@LOCALITY_OF_BIRTH", OleDbType.VarChar).Value = TextBox6.Text
.Parameters.Add("@PERSONAL_PHONE", OleDbType.VarChar).Value = TextBox7.Text
.Parameters.Add("@ADRESS", OleDbType.VarChar).Value = TextBox8.Text
.Parameters.Add("@ID", OleDbType.Integer).Value = TextBox1.Textجرب هذا التعديل و سيعمل معك الكود بإذن الله
RE: مشكلة بزر التعديل - حافظ حافظ - 20-05-18
بارك الله فيكم كلكم اخ سعود البسكري mrnooo2000 و ربنا يجازكم كل الخيرات و رمضان طيب