الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

أرجو المساعدة مرة أخرى في موضوع تحديث قاعدة البيانات باستخدام ADO.NET

مغلق
بدأه BlueMan في 10 أغسطس 2006 · 5 رد · 715 مشاهدة · في Microsoft Visual Basic.NET
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

الأخ AHMAD FATHY ..

أشكرك على ردك السريع على مشكلتي ... فقد قمت بتحميل الكتاب الذي أشرت إليه و عملت بمضمونه خطوة بخطوة لكن مازلت أتلقى رسالة الخطأ :( التالية :

Syntax error in INSERT INTO statement

و هذا هو البرنامج :unsure:

ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\1.mdb"
sSQL = "SELECT * FROM Errors" ' The Table Name is 'Errors'

'Connect to database ...
Dim ObjConn As New OleDbConnection(ConnStr)
ObjConn.Open()

'Creat Data Adapter ...
Dim objDA As New OleDbDataAdapter(sSQL, ObjConn)

' Creat Data Set ...
Dim ObjDS As New DataSet
objDA.Fill(ObjDS, "Errors")

' Add New Row ...
Dim xRow As DataRow
xRow = ObjDS.Tables(0).NewRow
With xRow
.Item(1) = 1
.Item(2) = "Serious New Error !"
.Item(3) = Now.ToShortTimeString.ToString
.Item(4) = Now.ToShortDateString.ToString
End With
ObjDS.Tables(0).Rows.Add(xRow)

'Update Data ( Creat CommandBuilder ) ... 
Dim objCMD As New OleDbCommandBuilder(objDA)
objDA.UpdateCommand = objCMD.GetUpdateCommand
objDA.DeleteCommand = objCMD.GetDeleteCommand
objDA.InsertCommand = objCMD.GetInsertCommand
objDA.Update(ObjDS, "Errors") ' This line generat Error !

' Close the Connection ...
ObjConn.Close()
#2

أخي الفاضل

أولا : مافائدة أن تنشأ CommandBuilder بعد تكوين DataSet فهو يجب أن ينشأ قبل تكوينها .

ثانيا : لا داعي لانشاء InsertCommand, UpdateCommand, and DeleteCommand properties

لأن CommandBuilder dr يقوم بانشائها تلقائيا .

#3

الظاهر انه ربما كان المشكلة من المعاملات واعني بالتحديد Data Taypes، لانه لو كان نوع البيانات Date فان Now.ToShortTimeString.ToString ترجع String وهي بالتالي ليست من النوع Date ، لذلك يكفي فقط Now.Date

#4

هل يعمل CommandBuilder في حالة وجود جداول مترابطه في جملة الإستعلام أو الترابط من خلال DataRelation نرجو التوضيح ..

1 - سقوط الإنسان ليس فشلاً ، ولكن الفشل أن يبقى حيث سقط .

2 - الفاشلون قسمان : قسم فكر ولم يفعل ، وقسم فعل ولم يفكر .

-------------------------------------------------------

درس في ADO.NET 2005, التعامل مع الجداول المترابطة في ado.net 2005

درس في الإجراءات الفرعية ( العامة )

درس في ADO.NET من الصفر إلى الإحتراف .

#5

انا احتجت من قبل لل CommandBuilder في اكثر من برنامج ، وكنت اكتب الكود كالاتي:

قبل تعريف ال DataSet ، قم باضافة DataTableMapping لل DataAdapter

Dim objCMD As New OleDbCommandBuilder(objDA)
objDA.UpdateCommand = objCMD.GetUpdateCommand
objDA.Update(ObjDS, "Errors")

لعمل التحديث

Dim objCMD As New OleDbCommandBuilder(objDA)
objDA.UpdateCommand = objCMD.GetUpdateCommand
objDA.Update(ObjDS, "Errors")
#6

هل ممكن الإجابه على السؤال في المشاركةرقم 4 .

1 - سقوط الإنسان ليس فشلاً ، ولكن الفشل أن يبقى حيث سقط .

2 - الفاشلون قسمان : قسم فكر ولم يفعل ، وقسم فعل ولم يفكر .

-------------------------------------------------------

درس في ADO.NET 2005, التعامل مع الجداول المترابطة في ado.net 2005

درس في الإجراءات الفرعية ( العامة )

درس في ADO.NET من الصفر إلى الإحتراف .

هذا الموضوع مغلق.

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…