⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 welcome.asp

📁 机械工业出版社马涛主编的《网站建设与管理》电子课件+示例源码
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="../../teacher/check.asp"-->

<%sql="select top 1 id from test order by id desc"
set rs=conn.execute (sql)
if  rs.eof then
kaoid=0
else
kaoid=rs("id")
end if 

if kaoid=0 then 
kaostus=0
else
sql="select count (学生id) as kaostus from report where 试卷ID="&kaoid&" and 学生id<>0 group by 试卷ID"
set rs=conn.execute (sql)
if  rs.eof then
kaostus=0
else
kaostus=rs("kaostus")
end if 
end if 



sql="select count(*) as xz from type2 "
set rs=conn.execute (sql)
if  rs.eof then
xz=0
else
xz=rs("xz")
end if 
sql="select count(*) as pd from type1 "
set rs=conn.execute (sql)
if  rs.eof then
pd=0
else
pd=rs("pd")
end if 
sql="select count(*) as tk from type3 "
set rs=conn.execute (sql)
if  rs.eof then
tk=0
else
tk=rs("tk")
end if 


%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 4.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 topmargin="0" leftmargin="0">
<div align="center">
  <center>
  <table border="0" cellpadding="10" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="500" height="100">
    <tr>
      <td align="center">&nbsp;</td>
    </tr>
    <tr>
      <td>以下是在线考试综合数据统计:</td>
    </tr>
    <tr>
      <td>1、现在进行的是第 <font color=red><%=kaoid%></font> 期考试,已经参加考试的有 <font color=red><%=kaostus%></font> 人;====&gt;<a href=report.asp?id=<%=kaoid%>>详细考试成绩表</a></td>
    </tr>
    <tr>
      <td>学生可以参加补考</td>
    </tr>
    <tr>
      <td>2、现在题库中共有 <font color=red><%=xz+tk+pd%></font> 道题,其中判断题 <font color=red><%=pd%></font> 道,选择题 <font color=red><%=xz%></font> 道,填空题 <font color=red><%=tk%></font> 道。</td>
    </tr>
  </table>
  </center>
</div>
</body>

</html>

⌨️ 快捷键说明

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