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

📄 setsapass_add.asp

📁 这是一个用ASP写的在线考试系统.特别一点 就是考试试卷有两种考法,一种为系统自动出卷,另一种是老师出卷考试.前者的实现是参考网上代码.总的来说还是很值得参考的.
💻 ASP
字号:

<!--

****************************************************************
*      Copyright (C) 2002 cnsohow.com All Rights Reserved
****************************************************************
*
*                         【 版权声明 】
*
*     本系统只作为一种技术交流,不能用于商业,希望能给予合作。
*
****************************************************************
*
*  如果你在使用这个程序的过程中有什么错误、意见、建议,请及时
*    告诉我,谢谢!
*
****************************************************************
*
* 安装说明:
*
*   默认的后台数据管理员用户名和密码都是:admin
*   默认的验证密码都是:firekinger
* 
****************************************************************几几点说明:

	题库中的数据只作测试,不为真实,若要实施还需删除各题表,重新建表。具体过程如下:
a)	先点击题库信息浏览,删除无用题表,注意:正修改的数据题表不能删除!
b)	添加题库建表,注意:数据表名是一次性的,建了就不能修改表名
c)	在试题后台设置中,选择要修改的考试题目,点击修改否
d)	再点击添加试题数据,添加相关考试试题,注意:在判断题中,对的写“A”,错的写“B”
e)	最后浏览选择试题,检查修改您所添加的试题。
****************************************************************
*      Copyright (C) 2002 cnsohow.com All Rights Reserved
****************************************************************
-->
<!--#include file="conn2.asp"-->
<!--#include file="loginV.asp"-->
<%
if not VerificationRole("ROLE_3") then
	response.Write("<p>&nbsp;</p><center><img src='../images/error.gif'></center>")
	response.End()
end if

RoleId=request("ModfiyId")
if RoleId="" or isNull(RoleId) then
	RoleId=session("saLoginRole")
end if
'RoleId=1
adminSql="select * from admin where ID="&RoleId
set rsT=conn.execute(adminSql)
SaNameT=rsT("SANAME")
SaPassT=rsT("SAPASS")
Role_1=rsT("ROLE_1")
Role_2=rsT("ROLE_2")
Role_3=rsT("ROLE_3")
%>
<html>
<head>
<title>::::欢迎光临校园在线考试系统::::</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="../css/Style.css" rel="stylesheet" type="text/css">
</head>

<body>
<p>&nbsp;</p>
<form name="setForm" method="post" action="save_setsapass_add.asp">
  <TABLE width="500" border=0 align=center cellPadding=2 cellSpacing=1 
                  bgColor=#d2ebff class="Xsmall">
  <TBODY>
    <TR> 
      <TD vAlign=top bgColor=#ffffff> <TABLE cellSpacing=0 cellPadding=0 width="100%" 
border=0>
          <TBODY>
            <TR> 
                <TD 
                              height=25 background=../images/backt.gif class="Xsmall"> <strong>密码权限设置</strong></TD>
            </TR>
          </TBODY>
        </TABLE></TD>
    </TR>
    <TR> 
      <TD vAlign=top bgColor=#ffffff><table width="88%" border="0" align="center" cellpadding="0" cellspacing="0" class="Xsmall">
            <TR> 
              <TD height="30" colspan="2" bgColor=#ffffff><div align="center"><font color="#FF0000"><%=session("sa_help")%></font></div></TD>
            </TR>
            <tr> 
              <td width="20%" height="25">管理用户名:</td>
              <td width="80%"> <input name="SaName" type="text" class="Sborder" id="SaName" size="16" maxlength="16">
              </td>
            </tr>
            <tr> 
              <td height="25">管理员密码:</td>
              <td><input name="SaPass" type="text" class="Sborder" id="SaPass" size="16" maxlength="16"> 
              </td>
            </tr>
            <tr> 
              <td height="25">权限设置:</td>
              <td> 
			  <input name='try' type='checkbox' id='try' value=true>
                试题管理
                <input name='stu' type='checkbox' id='stu' value=true>
                考生管理
                <input name='set' type='checkbox' id='set' value=true>
                系统管理
			  </td>
            </tr>            
            <tr> 
              <td height="25" colspan="2"><table width="80%" border="0" align="center" cellpadding="0" cellspacing="0" class="Xsmall">
                  <tr> 
                    <td><div align="center"> 
                        <input name="Submit" type="submit" class="Sborder" value="确 定">
                      </div></td>
                    <td><div align="center"> 
                        <input name="reset" type="reset" class="Sborder" id="reset3" value="重 写">
                      </div></td>
                    <td><div align="center"> 
                        <input name="back" type="button" class="Sborder" id="back3" value="返 回" onClick="javascript:history.back(1)">
                      </div></td>
                    <td><div align="center"> 
                        <input name="set" type="button" class="Sborder" id="back4" value="设 置" onClick="javascript:location.href ='setsapass.asp'">
                      </div></td>
                  </tr>
                </table></td>
            </tr>
          </table></TD>
    </TR>
  </TBODY>
</TABLE> 
  </form>
</body>
</html>
<%
conn.close
set conn=nothing
%>

⌨️ 快捷键说明

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