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

📄 reg.asp

📁 这是个考试系统哦 想学的人可以看看哦
💻 ASP
字号:
<!--#include file="conn.inc"-->
<!--#include file="char.asp"-->
<%
Dim rs
if request.ServerVariables("REQUEST_METHOD")="POST" then
	Dim department, realname, pwd
	department = checkstr(request("department"))
	realname = checkstr(request("realname"))
	pwd = checkstr(request("pwd"))
	
	If department<>"" And realname<>"" Then 
		Set rs = conn.execute("select userid from cadre_info where username='"& realname &"'")
		If Not rs.eof Then 
			response.write "<h3 style='color: red; text-align: center; margin: 1em;'>对不起,已存在姓名为“"& realname &"”的考生!</h3>"
			response.write "<p style='text-align: center; margin: 1em;'><a href='reg.asp'>返回</a></p>"
			response.End 
		Else 
			conn.execute "insert into [cadre_info] (Username,pwd,Department) values ('"& realname &"','"& pwd &"','"& department &"')"
			response.write "<h3 style='color: red; text-align: center; margin: 1em;'>资料填写成功!</h3>"
			response.write "<p style='text-align: center; margin: 1em;'><a href='logindefault.asp' target='_top'>开始登录考试</a></p>"
			response.End 
		End If 
	End If 
End If 
%>
<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">
<title></title>
<base target="_self">
<script language="javascript">
function submitit()
{
var myform=document.editpwd;
  if (myform.department.value=="")
  {
    alert("请选择所属党委!");
    return false;
  }
  else
  {
    if (myform.realname.value=="")
    {
      alert("请填写真实姓名!");
      return false;
    }
    else
    {
      if (myform.pwd.value=="")
		{
		  alert("请填写登录密码!");
		  return false;
		}
		else
		{
		  return true;
		}
    }
  }
}
</script>
<link rel="stylesheet" type="text/css" href="css.css">
<style type="text/css">
	.s01 {width: 120px;}
</style>
</head>

<body topmargin="0" leftmargin="0" style="background-color: #F1F1F1">

<h2 style="margin: 1em; text-align: center;">考生报名</h2>

<form method="POST" name="editpwd" action="reg.asp" onsubmit="return submitit();">
  <div align="center">
    <center>
    <table border="0" cellpadding="2" style="border-collapse: collapse" bordercolor="#111111" id="AutoNumber1" cellspacing="0">

      <tr>
        <td>所属部门:</td>
        <td>
<%
Set rs = conn.execute("select department from [department]")
If Not rs.eof Then 
	response.write "<select name=""department"" size=""1"">"
	response.write "<option value=''>----</option>"
	Do While Not rs.eof 
		response.write "<option value='"& rs(0) &"'>"& rs(0) &"</option>"
	rs.movenext
	Loop 
	response.write "</select>"
End If 
%>


		</td>
      </tr>
      <tr>
        <td>真实姓名:</td>
        <td></font>
        <input type="text" name="realname" size="20" onblur="this.className='s01'" onfocus="this.className='inputedit';this.select()" class="s01"></td>
      </tr>
      <tr>
        <td>登录密码:</td>
        <td></font>
        <input type="password" name="pwd" size="20" onblur="this.className='s01'" onfocus="this.className='inputedit';this.select()" class="s01"></td>
      </tr>

      <tr>
        <td colspan="2">
        <p align="center">
        <input border="0" value="保 存" name="I1" type="submit" class="s02"></td>
      </tr>
    </table>
    </center>
  </div>
</form>

</body>

</html>

⌨️ 快捷键说明

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