تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
مشكلة في كود التعديل ؟
#1
بسم الله الرحمن الرحيم

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

عند الضغط على زر تعديل.... تظهر لدي شاشة فيها كافة الحقول المتعلقة بذاتية زبون.......
وعند اجراء تعديل على بعض الحقول ........ومن ثم الضغط على زر حفظ.......تظهر رسالة خطا
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 بطريقة مختلفة على عدة اسطر ......يحيث يحقق سهولة في التتبع والانتباه الى الخطأ

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


الملفات المرفقة
.rar   Edit_Problem.rar (الحجم : 320.4 ك ب / التحميلات : 20)
الرد }}}}
تم الشكر بواسطة:
#2
السلام عليكم

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

وياريت البحث قبل طرح السؤال
الرد }}}}
تم الشكر بواسطة:
#3
إقتباس :
هل بالامكان كتابة كود Update بطريقة مختلفة على عدة اسطر
يمكن عن طريق سطر المتابعة _ قبل النزول لسطر جديد
لكني افضل التعديل بالبارامترات
كل مااعرفه في البرمجة تجدونه هنا
الرد }}}}
تم الشكر بواسطة:
#4
السلام عليكم
شكرا اخي sajad على الرابط الذي تفضلت به
وفعلا ......المشكلة من اسم الحقل Note ( لانه كلمة محفوظة لدى vb.net )

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

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

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

ارجو تصويب الكود ....حتى يعمل
والف شكر
الرد }}}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  [سؤال] مشكلة الاختلاف بين ترتيب الصفوف في قاعدة البيانات والداتا جريد فيو waelalmsry75 2 133 18-08-17, 05:40 PM
آخر رد: waelalmsry75
  مشكلة في كود البحث Search khaled12345 5 249 16-07-17, 08:22 PM
آخر رد: سعود
  مشكلة في الاتصال مع ملفات ال SQL الخارجية .mdf khaled12345 13 453 16-07-17, 06:21 AM
آخر رد: ahmed6610
  مشكلة في كود الحذف Delete khaled12345 5 190 15-07-17, 10:58 PM
آخر رد: أبوبكر سويدان
  [سؤال] مشكلة في كود الاضافة والتعديل في المشروع khaled12345 11 396 15-07-17, 02:17 AM
آخر رد: سعود
  مشكلة في عمل ال Navigation khaled12345 8 258 27-06-17, 01:25 PM
آخر رد: سعود
  [VB.NET] مشكلة في كود التعديل والحذف boofa2015 1 349 27-06-17, 12:03 AM
آخر رد: سعود
  مشكلة في تحزيم البرنامج samawi 2 197 23-04-17, 03:06 AM
آخر رد: samawi
  [سؤال] عندي مشكلة في احتساب الرواتب - مشروع HR dabas 0 283 17-01-17, 10:57 AM
آخر رد: dabas
  مشكلة مع حقل من نوع Money djelloul 2 276 16-01-17, 03:29 AM
آخر رد: مساعدة

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم