Session修改密码问题

<%
 'on error resume next
Dim strmm

strmm = trim(Request.Form("mm"))


dim rs
Set rs = Server.CreateObject("ADODB.Recordset")
conn.begintrans
rs.open "select * from users where userid='" &Session("ID")& "'" ,conn,1,3
rs.addnew
rs("userpw")=strmm

rs.update
rs.close
response.Write("<script> alert( '修改密码成功！ '); </script> ")

%>
为什么这样修改密码不成功呢

rs.addnew
这行去掉,你不是在新增记录

up