set rs = server.createobject("adodb.recordset") sql1="select * from users where userid='"&request("user")&"'" rs.open sql1,conn,1,1 if rs("password")<>oldpin then response.write"<script>alert('请输入正确的旧密码!');history.back();</script>" response.end end if
sql1="update users set password='"&newpin&"',login='"&confirm&"' where
userid='"&request("user")&"'" conn.execute sql1
set rs1=server.createobject("adodb.recordset") sql="select * from users where userid='"&request("user")&"'" rs1.open sql,conn1,1,3 response.write rs1("password")& " " & oldpin
sql="update users set password='"&newpin&"', where userid='"&request("user")&"'" conn.execute sql response.cookies("movie")("password")=newpin response.write"<script>alert('密码修改成功!');history.back();</script>" response.end end if 这段代码老是通不过?提示HTTP500服务器错误? 大家帮帮忙看看怎么回事!!!