منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
مشكلة في كود التعديل ؟ - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=41)
+--- الموضوع : مشكلة في كود التعديل ؟ (/showthread.php?tid=9551)

مشكلة في كود التعديل ؟ - kafi - 08-07-13

بسم الله الرحمن الرحيم

السلام عليكم ورحمة الله وبركاته

عند الضغط على زر تعديل.... تظهر لدي شاشة فيها كافة الحقول المتعلقة بذاتية زبون.......
وعند اجراء تعديل على بعض الحقول ........ومن ثم الضغط على زر حفظ.......تظهر رسالة خطا
syntax error in update statment
راجعت الكود اكثر من مرة ولم اهتدي الى مكان الخطأ لدي

وفيما يلي نص الكود
[HTML]
Dim cmd As New OleDb.OleDbCommand
Dim n As String

Try
n = Val(Me.txt_Zatea_id.Text)
DataConnection()

cmd.Connection = Conn
cmd.CommandType = CommandType.Text

cmd.CommandText = "UPDATE Zatea SET Customer = '" & Trim(txt_Customer.Text) & "' , Area = '" & Trim(Area_Combobox.Text) & "', bayan = '" & Trim(lbox_Bayan.Text) & "' , Phone1= '" & Trim(txt_Phone1.Text) & "' , Phone2= '" & Trim(txt_Phone2.Text) & "', Mobile= '" & Trim(txt_Mobile.Text) & "', Fax= '" & Trim(txt_fax.Text) & "', Email= '" & Trim(txt_Email.Text) & "', Note= '" & Trim(txt_Note.Text) & "' WHERE Zatea_id ='" & n & "'"

cmd.ExecuteNonQuery()
Conn.Close()
MsgBox("1 Record has been Updated correctly")

'اصطياد الاخطاء
Catch ex As Exception
'عرض الخطا فى رساله
MsgBox(ex.Message, 16, "خطأ")

End Try[/HTML]

لدي سؤالين
1- الاشارة الى مكمن الخطأ بالكود السابق
2- كما تلاحظون اخوتي، طول السطر المتعلق بال update وهنا فقط لدي ( 9 حقول) فما بالكم لو كان هناك عشرون حقل......؟؟؟؟؟؟؟؟؟؟
هل بالامكان كتابة كود Update بطريقة مختلفة على عدة اسطر ......يحيث يحقق سهولة في التتبع والانتباه الى الخطأ

ارجو تعديل المثال المرفق في ضوء ما ذكر اعلاه
والف الف شكر

مشكلة في كود التعديل ؟ - Sajad - 08-07-13

السلام عليكم

أقرأ هذا الموضوع حل Syntax error in INSERT INTO statement

وياريت البحث قبل طرح السؤال

مشكلة في كود التعديل ؟ - سعود - 08-07-13

إقتباس :
هل بالامكان كتابة كود Update بطريقة مختلفة على عدة اسطر
يمكن عن طريق سطر المتابعة _ قبل النزول لسطر جديد
لكني افضل التعديل بالبارامترات

مشكلة في كود التعديل ؟ - kafi - 08-07-13

السلام عليكم
شكرا اخي sajad على الرابط الذي تفضلت به
وفعلا ......المشكلة من اسم الحقل Note ( لانه كلمة محفوظة لدى vb.net )

تم تصويب الكود السابق
بالعمل على كتابة كلمة Notes بدلا من Note

اختفت الرسالة
syntax error in update statment

ولكن ظهرت رسالة جديدة
Data type mismatch in Criteria expression

ارجو تصويب الكود ....حتى يعمل
والف شكر