In my code, I get a result showing "data saved" but in my database, nothing is updating - what is wrong in this?
Private Sub btn_update_Click(sender As Object, e As EventArgs) Handles btn_update.Click
Try
Dim usernameuser As String = Session("user").ToString
conn.Open()
Dim STRLINE = "UPDATE CUSTOMER_LIST_TBL SET FIRST_NAME=@FIRST_NAME,LAST_NAME=@LAST_NAME,SIR_NAME=@SIR_NAME Where (PHONE_NO=@PHONE_NO)"
Dim CMD As New SqlCommand(STRLINE, conn)
CMD.Parameters.AddWithValue("@FIRST_NAME", SqlDbType.NVarChar).Value = f_name.Text.ToString()
CMD.Parameters.AddWithValue("@LAST_NAME", SqlDbType.NVarChar).Value = l_name.Text.ToString()
CMD.Parameters.AddWithValue("@SIR_NAME", SqlDbType.NVarChar).Value = sir_name.Text.ToString()
CMD.Parameters.AddWithValue("@PHONE_NO", SqlDbType.NVarChar).Value = usernameuser
CMD.ExecuteNonQuery()
lblmsg.Text = "data saved"""
Catch ex As Exception
lblmsg.Text = Err.Description
End Try
conn.Close()
End Sub