كيف يكتب هذا الكود

لو كنت جلبت قاعدة البيانات من ال SQL Server كان يمكن بسهوله اعادة البيانات بعد تحديثها الى قاعدة البيانات الاصلية باستخدام ال DataAdapter، لكن في مثل حالتك هذه، اي استجلاب البيانات من ملف XML وعرض البيانات في DataGridView ومن ثم حفظ البيانات في قاعدة بيانات SQL Server، اعتقد انه من الافضل استخدام ال SQLCommand كالاتي:

		Dim T As DataTable
		Dim R As DataRow
		T = NorthwindDataSet.Order_Details

		Dim Cnn As SqlClient.SqlConnection
		Dim Cmd As SqlClient.SqlCommand

		Cnn = New SqlClient.SqlConnection("Server=(local);User ID=sa;Database=Northwind")
		Cmd = New SqlClient.SqlCommand

		Cnn.Open()
		For Each R In T.Rows
		Cmd.CommandText = "INSERT INTO Order_Details(OrderID,ProductID,UnitPrice,Quantity,Discount)" & _
		"VALUSE(" & R("OrderID") & "," & R("ProductID") & "," & R("UnitPrice") & "," & R("Quantity") & "," & R("Discount") & ")"
		Cmd.ExecuteNonQuery()
		Next
		Cnn.Close()

مع مراعاة الاختلاف في ال Connection String

السلام عليكم

أشكرك الف شكر أخي عبد الباسط علي اهتمامك و ردك علي سؤالي

بس انا جربت الكود بيعطي خطاء عند Cnn.Open ومش عارف ليه

وجربت try في معرفه الخطاء و وضعته في المرفقات

جرب ال ConnectionString التالية

"AttachDbFileName=" & Application.StartupPath & "\\Northwind;integrated security=true;database=Northwind"

مع مراعاة مسار قاعدة البيانات اللتي ربما تكون مختلفه عندك من المسار Application.StartupPath