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

📄 test_base.asp

📁 在线考试系统源码实现远程判卷
💻 ASP
字号:
<!--#include file="inc/open.asp" -->
<!--#include file="inc/md5.inc" -->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>题库管理</title>
<!--#include file="inc/css.css" -->
</head>

<body>
<!--#include file="top.asp" -->
<!--#include file="menu.asp" -->
<%
if session("zzteacher")=false then

te_user_login=request.form("te_user_login")
te_pass_login=request.form("te_pass_login")
te_pass_login=ucase(md5(te_pass_login))
  str="select * from user_te where teacher_user='"&te_user_login&"' and teacher_pass='"&te_pass_login&"'"
  set rs=conn.execute(str)
  if not rs.eof then
    session("zzteacher")=true
	  if rs("teacher_jb")=99 then
         session("adminadmin")=true
      end if
  else
    session("zzteacher")=false
  end if
end if
%>
<table width="770" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="ff99cc" bgcolor="#edebeb">
  <tr> 
    <td width="198" valign="top">
<table width="198" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td valign="top"><table width="162" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr> 
                <td width="162" class="unnamed6">  </td>
              </tr>
              <tr> 
                <td background="images/nxmt_lj_46.gif" class="unnamed6"> </td>
              </tr>
              <tr> 
                <td background="images/nxmt_lj_44.gif" class="unnamed14"><div align="center">用户登录</div></td>
              </tr>
              <tr> 
                <td background="images/nxmt_lj_44.gif" class="unnamed6"> </td>
              </tr>
              <tr> 
                <td background="images/nxmt_lj_44.gif" class="unnamed14"> 
                  <div align="center"> <span class="unnamed12">
                    <%
  if session("zzteacher")=false then
%>
                    </span>
<form action="" method="post" name="form1" class="unnamed12">
                      用户名: 
                        <input name="te_user_login" type="text" id="te_user_login" size="12" maxlength="15">
                      
                      <br><br>密 码: 
                        <input name="te_pass_login" type="password" id="te_pass_login" size="12" maxlength="15">
                      <br><br>
                        <input type="submit" name="Submit" value=" 登 录 ">
                    </form>
                    <span class="unnamed12">
<%
  else
       response.write "<br>已登录  <a href=quit.asp>退出</a>"
	   response.write "<br><br><a href=stlx_setup1.asp?lx=no>设置为没有练习状态</a>"
	   response.write "<br><br><a href=stlx_setup1.asp?lx=yes>设置为练习状态</a>"
  end if
%>
                    </span></div></td>
              </tr>
              <tr> 
                <td background="images/nxmt_lj_45.gif" class="unnamed10"> </td>
              </tr>
            </table></td>
        </tr>
        <tr> 
          <td valign="top">&nbsp;</td>
        </tr>
        <tr>
          <td valign="top">
<% if session("zzteacher")=true then%>		  
		  <table width="162" border="0" align="center" cellpadding="0" cellspacing="0">
              <tr> 
                <td background="images/nxmt_lj_46.gif" class="unnamed10"> </td>
              </tr>
              <tr> 
                <td background="images/nxmt_lj_44.gif" class="unnamed14"><div align="center" class="unnamed6"> </div></td>
              </tr>
              <tr> 
                <td valign="middle" background="images/nxmt_lj_44.gif" class="unnamed12"> 
                  <form name="form3" method="post" action="dele_tm.asp">
                    <div align="center">第 
                      <input name="del_id" type="text" id="del_id" size="4">
                      题  
                      <input type="submit" name="Submit3" value="删除">
                    </div>
                  </form></td>
              </tr>
              <tr> 
                <td height="13" background="images/nxmt_lj_44.gif" class="unnamed10"><form action="edit_tm.asp" method="post" name="form4" class="unnamed12">
                    <div align="center">第 
                      <input name="edit_id" type="text" id="edit_id" size="4">
                      题  
                      <input type="submit" name="Submit4" value="修改">
                    </div>
                  </form></td>
              </tr>
              <tr>
                <td background="images/nxmt_lj_45.gif" class="unnamed10">  </td>
              </tr>
            </table>
<%end if%>			
			</td>
        </tr>
      </table></td>
    <td width="578" valign="top"> 
      <table width="570" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="448" valign="middle"> 
            <div align="center"> 
<%if session("zzteacher")=false then%>
              <table width="400" border="0" cellspacing="0" cellpadding="0">
                <tr>
                  <td><div align="center" class="unnamed19">
                      <p class="unnamed14">在线考试系统</p>
                      <p><strong><font color="#0000FF">题 库 管 理</font></strong></p>
                      <p class="unnamed14">管理员登录后可增加试题、删除试题、修改试题</p>
                    </div></td>
                </tr>
              </table>
              <%end if%>
			
              <!--增加操作-->
              <%
  imgname=request.querystring("img_name")
  tm_text_in=request.form("tm_text_in")
  da_a_in=request.form("da_a_in")
  da_b_in=request.form("da_b_in")
  da_c_in=request.form("da_c_in")
  da_d_in=request.form("da_d_in")
  da_OK=request.form("da_OK")
if tm_text_in="" then
   tm_text_in=" "
end if
if session("zzteacher")=true then
if imgname<>"" and tm_text_in<>"" and da_a_in<>"" and da_b_in<>"" and da_c_in<>"" and da_d_in<>"" and da_OK<>"" then
  str="insert into test_tm(tm_text,img_name,da_a,da_b,da_c,da_d,da) values('"&tm_text_in&"','"&imgname&"','"&da_a_in&"','"&da_b_in&"','"&da_c_in&"','"&da_d_in&"','"&da_OK&"')"
  set rs=conn.execute(str)
end if
  str="select * from test_tm"
  set rs=conn.execute(str)
  do while not rs.eof
	in_id=rs("id")+1
	rs.movenext
  loop
  in_id=cstr(in_id)&".jpg"
%>			  
              <form name="form2" method="post" action="test_base.asp?img_name=<%=in_id%>">
                <table width="420" border="0" cellspacing="0" cellpadding="0">
                  <tr>
                    <td valign="top" class="unnamed12">&nbsp;</td>
                    <td height="25" class="unnamed14"><div align="center"><strong><font color="#0000FF">增 
                        加 试 题</font></strong></div></td>
                  </tr>
                  <tr> 
                    <td width="20%" height="96" valign="top" class="unnamed12"> 
                      <div align="right"> 
                        <p align="center">题目内容&nbsp;:</p>
                        <p align="center"><br>
                           <font color="#FF0000">若有图片,<br>
                          宽度不要超<br>
                          过500像素.</font></p>
                      </div></td>
                    <td><textarea name="tm_text_in" cols="45" rows="6" id="tm_text_in"></textarea></td>
                  </tr>
                  <tr> 
                    <td width="20%" class="unnamed12"><div align="right">答案A:</div></td>
                    <td><input name="da_a_in" type="text" id="da_a_in" size="45" maxlength="255"></td>
                  </tr>
                  <tr> 
                    <td width="20%" class="unnamed12"><div align="right">答案B:</div></td>
                    <td><input name="da_b_in" type="text" id="da_b_in" size="45" maxlength="255"></td>
                  </tr>
                  <tr> 
                    <td width="20%" class="unnamed12"><div align="right">答案C:</div></td>
                    <td><input name="da_c_in" type="text" id="da_c_in" size="45" maxlength="255"></td>
                  </tr>
                  <tr> 
                    <td width="20%" class="unnamed12"><div align="right">答案D:</div></td>
                    <td><input name="da_d_in" type="text" id="da_d_in" size="45" maxlength="255"></td>
                  </tr>
                  <tr> 
                    <td class="unnamed12"><div align="right">正确答案:</div></td>
                    <td class="unnamed14"><input name="da_OK" type="radio" value="A" checked>
                      A; 
                      <input type="radio" name="da_OK" value="B">
                      B; 
                      <input type="radio" name="da_OK" value="C">
                      C; 
                      <input type="radio" name="da_OK" value="D">
                      D。</td>
                  </tr>
                  <tr> 
                    <td width="20%">&nbsp;</td>
                    <td height="40" class="unnamed14"> <div align="center"><a href="upfile/inimgage.asp" target="_blank">输入图片</a>  <font color="#FF0000">请把图片文件名改为 </font><%=in_id%></div></td>
                  </tr>
                  <tr> 
                    <td>&nbsp;</td>
                    <td height="40"> <div align="center"> 
                        <input type="submit" name="Submit2" value=" 写入题库 ">
                      </div></td>
                  </tr>
                </table>
              </form>
<%end if%>			  
              <!--增加操作结束-->
            </div></td>
          <td width="130" valign="top"> 
            <div align="center"><img src="images/xxkj.jpg" width="129" height="184">
<%if session("zzteacher")=true then%>
              <table width="126" border="0" align="center" cellpadding="4" cellspacing="0">
                <tr>
                  <td class="unnamed12"><p>注意:支持html格式<br>
                      &lt;p&gt;换一行并空一行<br>
                      &lt;br&gt;换行<br>
                      &lt;b&gt;黑体<br>
                      &lt;i&gt;斜体<br>
                      &lt;center&gt;居中<br>
                      &lt;size=n&gt;字号<br>
                        …… </p>
                    </td>
                </tr>
              </table>
<%end if%>
            </div></td>
        </tr>
      </table> </td>
  </tr>
</table>
<%conn.close%>
<!--#include file="inc/bottom.inc" -->
</body>
</html>

⌨️ 快捷键说明

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