[kofa]

كود :

هذا هو الكود المراد تعديله


Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click
       Dim cmd As New OleDbCommand("update student set (Student_Name = '" & TextBox1.Text & "',Class = '" & TextBox2.Text & "',Mobile = '" & TextBox3.Text & "',Bus = '" & TextBox4.Text & "',MLG_email = '" & TextBox5.Text & "',Address = '" & TextBox6.Text & "',Company = '" & TextBox7.Text & "',Father_Shara = '" & TextBox8.Text & "',Student_ID = '" & TextBox8.Text & "' where Student_Name = " & TextBox1.Text & ")")
       cmd.Connection = con
       con.Open()
       cmd.ExecuteNonQuery()
       con.Close()

   End Sub