📄 register1.asp
字号:
<html>
<head>
<title>远程教育网欢迎你</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="inc/index.css" type="text/css">
<style type="text/css">
<!--
body {
background-color: #FFFFCC;
}
-->
</style></head>
<SCRIPT language=JavaScript src="VREG1.js"></SCRIPT>
<body text="#000000" leftmargin="0" topmargin="0">
<TABLE width=776 border=0 align="center" cellPadding=0 cellSpacing=0>
<TBODY>
<TR>
<TD rowSpan=2 width=34><IMG height=93 src="inc1/top.files/top-1.gif"
width=34></TD>
<TD bgColor=#639aff height=62><IMG height=62 src="inc1/top.files/top-2.gif"
width=300></TD></TR>
<TR>
<TD background=inc1/top.files/top-3.gif><IMG height=31
src="inc1/top.files/top-3.gif" width=100></TD></TR></TBODY></TABLE>
<table width="776" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="255" height="75"></td>
<td width="207"></td>
<td width="314"></td>
</tr>
<tr>
<td height="211"></td>
<td valign="top">
<FORM action="" method=post name="register">
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="72" height="24" valign="top">用户名</td>
<td width="134" valign="top">
<input type="text" name="name" size="15" class=input1>
</td>
</tr>
<tr>
<td width="72" height="24" valign="top">真实姓名</td>
<td width="134" valign="top">
<input type="text" name="realname" size="15" class=input1>
</td>
</tr>
<tr>
<td width="72" height="24" valign="top">用户类别</td>
<td width="134" valign="top">
<select name="select" class=input1>
<option value="选择用户类别">选择用户类别</option>
<option value="学生">学生</option>
<option value="教师">教师</option>
</select>
</td>
</tr>
<tr>
<td valign="top" height="24">密码</td>
<td valign="top"><input type="password" name="password" size="15" class=input1></td>
</tr>
<tr>
<td height="24" valign="top">再输入一次</td>
<td valign="top"><input type="password" name="password1" size="15" class=input1></td>
</tr>
<tr align="center">
<td height="48" colspan="2" valign="top">
<input type="button" name="Submit" value="注册" style="position: relative; color: #00006A; font-family: 宋体; font-size: 9pt; height: 19" onClick="check()"></td>
</tr>
</table>
</form>
</td>
<td></td>
</tr>
<tr>
<td height="57"></td>
<td></td>
<td></td>
</tr>
</table>
</body>
</html>
<!--#include file="inc/dbconn.inc"-->
<% dim name,password,selectval
name=request("name")
realname=request("realname")
password=request("password")
selectval=request("select")
if name="" then Response.End
Set rs = Server.CreateObject("ADODB.Recordset")
if selectval="学生" then
sql="select * from student where sname='"&name&"'"
rs.open sql,conn,3,3
if rs.eof then
rs.addnew
rs("sname")=name
rs("srealname")=realname
rs("spassword")=password
rs.update
else
response.write"<SCRIPT language=JavaScript>alert('用户名重复!');"
response.write"javascript:history.go(-1)</SCRIPT>"
end if
else
sql="select * from teacher where tname='"&name&"'"
rs.open sql,conn,3,3
if rs.eof then
rs.addnew
rs("tname")=name
rs("trealname")=realname
rs("tpassword")=password
rs.update
else
response.write"<SCRIPT language=JavaScript>alert('用户名重复!');"
response.write"javascript:history.go(-1)</SCRIPT>"
end if
end if
response.write"<SCRIPT language=JavaScript>alert('你的资料注册成功,请返回主页登录!');"
response.write"this.location.href='default.htm';</SCRIPT>"
rs.close
conn.close
set conn=nothing
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -