📄 is_submit.asp
字号:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="const.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>班级管理</title>
<link href="img/Style.css" rel="stylesheet" type="text/css" />
<style type="text/css">
<!--
.style2 {color: #FFFFFF}
-->
</style>
</head>
<body>
<%
action=trim(Request("action"))
if action="toclass" then
set c = Server.CreateObject("ADODB.Command")
c.ActiveConnection = dbconn
c.CommandText = "update class set power=0"
c.CommandType = 1
c.CommandTimeout = 0
c.Prepared = true
c.Execute()
if err.number="0" then
Response.Write("<script language='javascript'>alert('班级任务重新分配成功');</script>")
else
Response.Write("<script language='javascript'>alert('班级任务重新分配失败');</script>")
end if
end if
if action="todept" then
set c = Server.CreateObject("ADODB.Command")
c.ActiveConnection = dbconn
c.CommandText = "update dept set power=0"
c.CommandType = 1
c.CommandTimeout = 0
c.Prepared = true
c.Execute()
if err.number="0" then
Response.Write("<script language='javascript'>alert('部门任务重新分配成功');</script>")
else
Response.Write("<script language='javascript'>alert('部门任务重新分配失败');</script>")
end if
end if
%>
<%
Set myclass=new xdownpage
myclass.getconn=dbconn
myclass.getsql = "SELECT * FROM class order by class_name asc"
myclass.pagesize=20
set rs=myclass.getrs()
sqldept="select dept_id,dept_name,truename,power from dept"
set rsdept=dbconn.execute(sqldept)
%>
<table width="90%" border="0" align="center" class="atable1">
<tr>
<td width="60%" valign="top"><table width="100%" border="0" align="center" cellpadding="2" cellspacing="1">
<tr bordercolor="#D4D0C8" bgcolor="#333">
<td width="21%"><div align="center" class="style2">编号</div></td>
<td width="24%"><div align="center" class="style2">班级名称</div></td>
<td width="26%"><div align="center" class="style2">负责人姓名</div></td>
<td width="29%" class="style2"><div align="center"><%=class_allow_month%>月份提交情况</div></td>
</tr>
<%If rs.Eof and rs.Bof Then%>
<tr class="tdmenu" >
<td colspan="6"><div align="center" >目前暂无班级记录，请<a href="class_add.asp" class="style2">添加</a></div></td>
</tr>
<% End If %>
<%for i=1 to myclass.pagesize
if not rs.eof then %>
<tr class="tdmenu" >
<td><div align="center" ><%=(rs.Fields.Item("class_id").Value)%></div></td>
<td><div align="center" ><%=(rs.Fields.Item("class_name").Value)%></div></td>
<td><div align="center" ><%=(rs.Fields.Item("truename").Value)%></div></td>
<td>
<div align="center">
<% if rs(5)=0 then Response.write("<font class='jushe'>未提交</red>") else Response.write("已提交") end if%>
</div></td>
</tr>
<% rs.movenext()
else
exit for
end if
next %>
<tr>
<td height="30" colspan="6" align="right" valign="bottom" class="tdmenu"><div align="center">
<% myclass.showpage()%>
</div></td>
</tr>
</table>
<table width="100%" border="0" class="tdmenu">
<tr>
<td><form>
<div align="center">
<input name="提交2" type="submit" class="tdmenu" value="重新分配班级的评测任务" />
<input type="hidden" name="action" value="toclass" /></div>
</form></td>
</tr>
</table></td>
<td width="40%" valign="top"><table width="100%" border="0" align="center" cellpadding="2" cellspacing="1">
<tr>
<td width="11%" bgcolor="#333333"><div align="center" class="style2">
<div align="center">编号</div>
</div></td>
<td width="28%" bgcolor="#333333"><div align="center" class="style2">
<div align="center">部门名称</div>
</div></td>
<td width="25%" bgcolor="#333333"><div align="center" class="style2">
<div align="center">负责人姓名</div>
</div></td>
<td width="36%" bgcolor="#333333" class="style2"><div align="center"><%=dept_allow_month%>月份提交情况</div></td>
</tr>
<%if rsdept.eof then%>
<tr>
<td colspan="6" class="tdmenu"><div align="center"><br />
还没有部门，<a href="dept_add.asp">请添加</a><br />
<br />
</div></td>
</tr>
<%else%>
<%do while not rsdept.eof %>
<tr>
<td class="tdmenu"><div align="center"><%=rsdept(0)%></div></td>
<td class="tdmenu"><div align="center"><%=rsdept(1)%></div></td>
<td class="tdmenu"><div align="center"><%=rsdept(2)%></div></td>
<td class="tdmenu"><div align="center">
<% if rsdept(3)=0 then Response.write("<font class='jushe'>未提交</red>") else Response.write("已提交") end if%>
</div></td>
</tr>
<%
rsdept.movenext()
loop
end if
rsdept.close
set rsdept=nothing
dbconn.close
%>
</table>
<table width="100%" height="100%" border="0" class="tdmenu">
<tr>
<td><p class="jushe">说明 :<br />
1、 班级的提交情况是指班级负责人对本班学生指定月份得分申请的审核的提交情况<br />
2、部门的提交情况是指部门在指定的月份对学生的加减分提交情况<br />
<span class="jushe"> 3、没有提交的要通知各负责人尽快提交,只有所有提交后才能进行得分的计算工作</span><br />
4、重新分配可以是在锁定新月份后也可以...只是作为管理员观看评分进程的标志
<form>
<div align="center">
<input name="提交" type="submit" class="tdmenu" value="重新分配部门的评测任务" />
<input type="hidden" name="action" value="todept" />
</div>
</form>
<br />
</p>
</td>
</tr>
</table></td>
</tr>
</table>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -