更改密码
password=md5(trim(request("password")))
userID=htmlencode(request.form("userID"))
Set rs=Server.CreateObject("Adodb.RecordSet")
rs.Open "Select * from student where UserID='"&userID&"'",conn,1,3
rs("PassWord")=password
rs.update
rs.close
set rs=nothing
删除用户
Set rs=Server.CreateObject("Adodb.RecordSet")
rs.Open "Delete * from student where UserID='"&userID&"'",conn,1,3
rs.close
set rs=nothing