^^^^^^^^^^弄不出来今天不睡觉了^^^^^^^^^^^^^^^

Dim Rs
Set Rs=server.createobject("ADODB.Recordset")
msSql="SELECT usertype FROM users where username='52kan'"
Rs.open msSql,conn,1,3
if not Rs.eof then
Rs("usertype")=2
Rs.update
end if
Rs.close : set Rs=nothing
conn.close : set conn=nothing

奇怪死了
为什么会把今天注册的所有用户的usertype都改成2了