16-09-13, 12:27 PM
السلام عليكم و رحمة الله و بركاته
جربي التعديل التالي على جملة Update
cmd.CommandText = "UPDATE patient_info SET name='" & DataGridView1.Rows(gridrow).Cells("P_name").Value & "', adress ='" & DataGridView1.Rows(gridrow).Cells("adress").Value & "',job ='" & DataGridView1.Rows(gridrow).Cells("job").Value & "', age =" & DataGridView1.Rows(gridrow).Cells("age").Value & ",gender=" & DataGridView1.Rows(gridrow).Cells("gender").Value & ", date='# & DataGridView1.Rows(gridrow).Cells("date_treat").Value & "'#,phone=" & DataGridView1.Rows(gridrow).Cells("tel").Value & ",jawwal=" & DataGridView1.Rows(gridrow).Cells("jawwal").Value & ", email='" & DataGridView1.Rows(gridrow).Cells("email").Value & "'" & " WHERE id = " & CType(DataGridView1.Rows(gridrow).Cells("id").Value, Integer)
السطر الملون بالأحمر
السلام عليكم و حمة الله و بركاته
جربي التعديل التالي على جملة Update
cmd.CommandText = "UPDATE patient_info SET name='" & DataGridView1.Rows(gridrow).Cells("P_name").Value & "', adress ='" & DataGridView1.Rows(gridrow).Cells("adress").Value & "',job ='" & DataGridView1.Rows(gridrow).Cells("job").Value & "', age =" & DataGridView1.Rows(gridrow).Cells("age").Value & ",gender=" & DataGridView1.Rows(gridrow).Cells("gender").Value & ", date='# & DataGridView1.Rows(gridrow).Cells("date_treat").Value & "'#,phone=" & DataGridView1.Rows(gridrow).Cells("tel").Value & ",jawwal=" & DataGridView1.Rows(gridrow).Cells("jawwal").Value & ", email='" & DataGridView1.Rows(gridrow).Cells("email").Value & "'" & " WHERE id = " & CType(DataGridView1.Rows(gridrow).Cells("id").Value, Integer)
السطر الملون بالأحمر
السلام عليكم و حمة الله و بركاته
