نداء عاجل للمهندس عدي جزاك الله عنا خيرا التعديل لا يتم من خلا الكود
Dim SavInto As New OleDb.OleDbCommand
Dim ConStr As String = _
"Provider=Microsoft.Jet.OLEDB.4.0; Data Source =" & _
Application.StartupPath & "\Market.mdb"
Dim Conn As New OleDbConnection(ConStr)
SavInto.Connection = Conn
SavInto.CommandType = CommandType.Text
Dim X As String = "UPDATE Products SET Products.Name ="" " + TextBox2.Text + """ Price ="" " + TextBox3.Text + """ IDCategories ="" " + TextBox4.Text + """ Code ="" " + TextBox5.Text + """ WHERE Products.ID= " + TextBox1.Text + ";"
SavInto.CommandText = X
Conn.Open()
SavInto.ExecuteNonQuery()
Conn.Close()
MsgBox("تمت عملية الحفظ في الداتا بيز")
مع العلم ان الكود لا يوجد بة اي مشاكل وتم تجربتة علي عددمن الجداول
