📄 savepass.asp
字号:
<!--#include file="conn.asp"--><%
Dim testid
Dim newsid
%>
<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="../DEFAULT.CSS">
<script language="JavaScript1.2" src="../js/lock.js"></script>
</head>
<body oncontextmenu="self.event.returnValue=false" onselectstart="selectstart();" bgcolor="#FFFFFF">
<%
if request("objname")="考试计划" then
testid=request("testid")
sql="select * from exam_test where examid='"& testid&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
if rs("havepass")<>0 then
%>
<p><br>
<br>
</p>
<div align="center">
<center>
<table cellspacing="0" style="border-collapse: collapse" width="480" id="AutoNumber2" cellpadding="0" border="1" class="withborder" bgcolor="#F1F1F1" bordercolor="#000000">
<tr>
<td width="100%" height="25" class="border"> 操作成功</td>
</tr>
<tr>
<td width="100%" height="160" style="height: 160">
<p align="center">考试计划已经得到审批！</td>
</tr>
<tr>
<td width="100%" height="25" class="border" style="height: 30">
<p align="center">
<input type="button" value=" 返 回 " name="B3" class="s02" onclick="window.location='passexam.asp'"></td>
</tr>
</table>
</center>
</div>
<%
else
rs("passuserid")=request.cookies("myuserid")
rs("passtime")=date()
if request("yesorno")="同意" then
rs("havepass")=1
else
rs("havepass")=2
end if
rs.update
rs.close
sql="select * from waitforpass where objid='"& testid&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
if request("yesorno")="同意" then
rs("havepass")=1
else
rs("havepass")=2
end if
rs("passuserid")=request.cookies("myuserid")
rs("passusername")=request.cookies("myusername")
rs("passtime")=date()
rs("passadvice")=request("passadvice")
rs.update
rs.close
%>
<p><br>
<br>
</p>
<div align="center">
<center>
<table cellspacing="0" style="border-collapse: collapse" bordercolor="#000000" width="480" id="AutoNumber2" cellpadding="0" border="1" bgcolor="#F1F1F1">
<tr>
<td width="100%" height="25" bordercolor="#000000" class="border"> 操作成功</td>
</tr>
<tr>
<td width="100%" height="160" bordercolor="#000000" style="height: 160">
<p align="center">祝贺您，已经成功审批考试计划！</td>
</tr>
<tr>
<td width="100%" height="25" bordercolor="#000000" class="border" style="height: 30">
<p align="center">
<input type="button" value=" 返 回 " name="B3" class="s02" onclick="window.location='passexam.asp'"></td>
</tr>
</table>
</center>
</div>
<%
end if
end if
if request("objname")="考试新闻" then
newsid=request("newsid")
sql="select * from exam_news where newsid='"& newsid&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
if rs("havepass")<>0 then
%>
<p></p>
<p></p>
<div align="center">
<center>
<table cellspacing="0" style="border-collapse: collapse" width="480" id="AutoNumber2" cellpadding="0" border="1" class="withborder" bgcolor="#F1F1F1" bordercolor="#000000">
<tr>
<td width="100%" height="25" class="border"> 操作成功</td>
</tr>
<tr>
<td width="100%" height="160" style="height: 160">
<p align="center">新闻已经得到审批！</td>
</tr>
<tr>
<td width="100%" height="25" class="border" style="height: 30">
<p align="center">
<input type="button" value=" 返 回 " name="B3" class="s02" onclick="window.location='passnews.asp'"></td>
</tr>
</table>
</center>
</div>
<%
else
rs("passuserid")=request.cookies("myuserid")
rs("passusername")=request.cookies("myusername")
rs("passtime")=date()
if request("yesorno")="同意" then
rs("havepass")=1
else
rs("havepass")=2
end if
rs.update
rs.close
sql="select * from waitforpass where objid='"& newsid&"'"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
if request("yesorno")="同意" then
rs("havepass")=1
else
rs("havepass")=2
end if
rs("passuserid")=request.cookies("myuserid")
rs("passusername")=request.cookies("myusername")
rs("passtime")=date()
rs("passadvice")=request("passadvice")
rs.update
rs.close
%>
<p><br>
<br>
</p>
<div align="center">
<center>
<table cellspacing="0" style="border-collapse: collapse" bordercolor="#000000" width="480" id="AutoNumber2" cellpadding="0" border="1" bgcolor="#F1F1F1">
<tr>
<td width="100%" height="25" bordercolor="#000000" class="border"> 操作成功</td>
</tr>
<tr>
<td width="100%" height="160" bordercolor="#000000" style="height: 160">
<p align="center">祝贺您，已经成功审批新闻！</td>
</tr>
<tr>
<td width="100%" height="25" bordercolor="#000000" class="border" style="height: 30">
<p align="center">
<input type="button" value=" 返 回 " name="B3" class="s02" onclick="window.location='passnews.asp'"></td>
</tr>
</table>
</center>
</div>
<%
end if
end if
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -