📄 admincreatepaper3.asp

📁 在线考试系统
💻 ASP
字号:
<!--#include file="conn.inc"-->
<html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>祝贺您</title>
<link rel="stylesheet" type="text/css" href="css.css">
</head>

<body>

<%
sql="select * from exam_test"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
rs.addnew
randomize
testid=100000000+fix(100000000*Rnd)
rs("testid")=testid
rs("subject")=request("subject")
rs("totalper")=request("totalper")
rs("singlecount")=request("singlecount")
rs("multicount")=request("multicount")
rs("judgecount")=request("judgecount")
rs("singleper")=request("singleper")
rs("multiper")=request("multiper")
rs("judgeper")=request("judgeper")
rs("testtime")=request("testtime")
rs("starttime")=request("starttime")
rs("endtime")=request("endtime")
rs("settime")=date()
rs("setuserid")=request.cookies("userid")
rs.update
rs.close

userid=split(request("userid"),",")
i=ubound(userid)
for j=0 to i
sql="select * from exam_testuser"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
rs.addnew
rs("testid")=testid
rs("userid")=userid(j)
rs.update
rs.close
next

sql="select * from waitforpass"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
rs.addnew
rs("objid")=testid
rs("objname")="考试计划"
rs("passuserid")=request("shenhr")
rs.update
rs.close

%>
<p>　</p>
<p>　</p>
<div align="center">
  <center>
  <table cellspacing="0" style="border-collapse: collapse" bordercolor="#336699" width="480" id="AutoNumber2" cellpadding="0" border="1">
    <tr>
      <td width="100%" height="25" bgcolor="#6699CC"><b>&nbsp;<font color="#FFFFFF">操作成功</font></b></td>
    </tr>
    <tr>
      <td width="100%" height="160" bgcolor="#EFEFEF">
      <p align="center"><font size="2">祝贺您，已经成功生成试卷！按下返回按钮返回系统首页！</font></p>
      <p align="center"><font size="2">(<font color="#ff0000">注意：生成的试卷需要审批后才能生效</font>)</font></td>
    </tr>
    <tr>
      <td width="100%" height="25" bgcolor="#6699CC">
      <p align="center">
      <input type="button" value=" 返 回 " name="B3" class="s02" onclick="window.location='news.asp'"></td>
    </tr>
  </table>
  </center>
</div>

</body>

</html>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -