iamok_ks.asp

来自「测试上除办公系统综合办公系统办公系统办公系统」· ASP 代码 · 共 32 行

<!--#include file="conn.asp"-->
 <%
  if session("username")="" then
  response.redirect "relogin.asp"
  end if


username=request.cookies("username")
 
kcid=request("kcid")
paperno=request("paperno")

sql1="SELECT  * from tbscore  where username='"&username&"' and  kcid="&kcid&"  and paperno="&paperno
set rs1=server.createobject("adodb.recordset")
rs1.open sql1,conn,3,2

do while  not rs1.eof 

 
   rs1("isexam")=1
 
 
    rs1.update

rs1.movenext

loop


    response.redirect "ks_selecttype.asp?paperno="&paperno

%>