<!--#include file="conn.asp"-->
<%
if session("admin")="" or session("key")="" then
response.Write("<script>alert('您好!您還沒有登陸');window.location.href('login.asp')</script>")
response.end
end if
%>

<%
dim id
id=request.querystring("id")
if id<>"" then
set rs=server.createobject("adodb.recordset")
cmd="select * from userlogin where kaohao='"&id&"'"
rs.open cmd,conn,1,3
rs("logintime")=""
rs("ip")=""
rs("score")="0"
rs("endtime")=""
rs.update
response.Write("<script>alert('登記考生補考成功,該生已經可以重新考試!');window.location.href('Manageuser.asp')</script>")
else
response.Write("<script>alert('請至少選擇一個考生');window.location.href('Manageuser.asp')</script>")
response.end
end if
%>