updatauser.asp

1.本考试系统没有任何商业利益,请大家放心使用 2.本人进行了一些修改和界面美化 3.本考试系统考试题题型均为单选题,

<!--#include file="conn.asp"-->
<%
dim user,password,score,kaohao
kaohao=session("id")
if kaohao<>"" then
password=request.Form("psw")
user=request.Form("user")
score=request.Form("score")
set rs=server.createobject("adodb.recordset")
cmd="select * from userlogin where kaohao='"&kaohao&"'"
rs.open cmd,conn,1,3
rs("user")=user
rs("passwd")=password
rs("score")=score
'rs("kaohao")=kaohao
rs.update
response.Write("<script>alert('考生信息修改成功!');window.location.href('Manageuser.asp')</script>")
else
response.Write("<script>alert('未选择考生!');window.location.href('Manageuser.asp')</script>")
end if
%>