请看看我的代码什么地方有错

Question

1. can you catch the error to see what is wrong?
....
Catch ex as Exception
Label1.Text = ex.Message
2. try to change Password to [Password]3. or just tryOleDbSelectCommand1.CommandText = "Update Center_User Set UserID='" & TextBox4.Text & "',[Password] = '" & TextBox3.Text & "' WHERE  UserID = '" & Session("UserID") & "' and  [Password]='" & Session("Password") & "'"
Conn.Open()
dim n as Integer = OleDbSelectCommand1.ExecuteNonQuery()
if n = 0 then
  Label1.Text = "something is wrong"
else
  Session("UserID") = TextBox4.Text 
  Session("Password") = TextBox3.Text
  Label1.Text = "您已经成功修改"
end if