📄 addnew.asp
字号:
<% Response.Buffer=True %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="incregister.css" type="text/css">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>人才市场 新用户注册</title>
</head>
<body topmargin="0" leftmargin="0">
<!--#include file="top.htm"-->
<!-- #include file="incdbconn.asp" -->
<!-- #include file="incenpasswd.asp" -->
<SCRIPT language=JavaScript src="incvalidate.js"></SCRIPT>
<SCRIPT language=JavaScript>
<!--
function checkform()
{
if (checkstring("用户名", document.addnew.uname.value, false)) {
document.addnew.uname.focus();
return false;
}
var pwd = document.addnew.pwd.value;
if (addnew.pwd.value=="") {
alert("请输入登录密码！");
addnew.pwd.focus();
return (false);
}
if (pwd.length < 3) {
alert("密码不能少于三位！");
return false;
}
var pwd2 = document.addnew.pwd2.value;
if (pwd != pwd2) {
alert("两次密码输入不一致！");
document.addnew.pwd.value="";
document.addnew.pwd2.value="";
return false;
}
if (checkemail("电子邮件", document.addnew.email.value, false)) {
document.addnew.email.focus();
return false;
}
return true;
}
//-->
</SCRIPT>
<div align="center">
<center>
<table border="0" cellpadding="0" cellspacing="0" width="780" height="45">
<tr>
<td width="766" height="18" valign="top" colspan="5" bgcolor="#396BA5">
</td>
</tr>
<tr>
<td width="144" height="162" valign="top" bgcolor="#396BA5">
<p align="center"> </p>
<p>
</td>
<td width="29" height="309" valign="top"><img border="0" src="imgselfk.GIF"></td>
<td width="462" height="309">
<FORM name=addnew onsubmit="return checkform();" action=addnew.asp method=post>
</center>
<div align="center">
<table border="1" cellpadding="0" cellspacing="0" width="352" height="1" bordercolor="#000000" bordercolorlight="#000000" bordercolordark="#FFFFFF">
<tr>
<td width="350" height="13" background="imgt-bg1.gif">
<p align="center">=== 新用户注册 ===</td>
</tr>
<center>
<center>
<tr>
<td width="350" height="263" bgcolor="#EBEBEB">
<p align="center"> 用户名:<input type="text" name="uname" size="15" maxLength=15> </p>
<p align="center"> 登录密码:<input type="password" name="pwd" size="15" maxLength=15></p>
<p align="center"> 重复密码:<input type="password" name="pwd2" size="15" maxLength=15></p>
<p align="center">联系E-mail:<input type="text" name="email" size="15" maxLength=30></p>
<p align="center"><input type="radio" value="person" checked name="usertype">个人用户
<input type="radio" name="usertype" value="company">单位用户</p>
<p align="center"><input type="submit" value="注 册" name="B1" style="position: relative; height: 19"></td>
</tr>
</center>
</center>
<center>
<center>
</center>
</center>
</table>
</div>
</td>
<center>
<td width="1" height="309" valign="top" bgcolor="#00006A"></td>
<td width="119" height="309" valign="top" bgcolor="#F3F3F3"></td>
</tr>
<tr>
<td width="743" height="1" valign="top" colspan="5" bgcolor="#396BA5">
<p align="center">
</td>
</tr>
<tr>
<td width="743" height="3" valign="top" colspan="5">
<p align="center">
</td>
</tr>
<tr>
<td width="743" height="3" valign="top" colspan="5">
</td>
</tr>
</table>
</center>
</div>
</body>
</html>
<% zhmail="欢迎您注册炫网资讯的人才市场,请尽快发布您的招聘信息或求职简历以完成您的注册!"
zhmail=zhmail&"完全注册之后,您便能享受到本站完善的求职招聘服务,目前主要功能有个人收藏夹和站内信箱功能!"
zhmail=zhmail&"最后祝您在本站找到合适的工作或招到合适的人才!"
zhmail=zhmail&"<br> P.S.(此信为系统所发,请不要回复,谢谢!)"
usertype=request("usertype")
if usertype="" then Response.End
uname=request("uname")
email=request("email")
pwd=mistake(request("pwd"))
if usertype="person" then
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from person where uname='"&uname&"'"
rs.open sql,conn,3,3
if not rs.eof then
response.write"<SCRIPT language=JavaScript>alert('用户名重复，请重新选择一个用户名！');"
response.write"javascript:history.go(-1)</SCRIPT>"
end if
rs.close
sql="select * from person"
rs.open sql,conn,3,3
rs.addnew
rs("uname")=uname
rs("pwd")=pwd
rs("email")=email
rs.update
rs.close
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from pmailbox"
rs.open sql,conn,3,3
rs.addnew
rs("reid")=uname
rs("senduid")="sysop"
rs("title")="祝贺您注册成功！"
rs("sendname")="系统管理员"
rs("sdate")=now()
rs("mailtext")=zhmail
rs.update
rs.close
session("puid")=uname
response.write"<SCRIPT language=JavaScript>alert('新用户注册成功，正在登录中...，请稍候！');"
response.write"this.location.href='permain.asp';</SCRIPT>"
else
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from company where uname='"&uname&"'"
rs.open sql,conn,3,3
if not rs.eof then
response.write"<SCRIPT language=JavaScript>alert('用户名重复，请重新选择一个用户名！');"
response.write"javascript:history.go(-1)</SCRIPT>"
end if
rs.close
sql="select * from company"
rs.open sql,conn,3,3
rs.addnew
rs("uname")=uname
rs("pwd")=pwd
rs("email")=email
rs.update
rs.close
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from cmailbox"
rs.open sql,conn,3,3
rs.addnew
rs("reid")=uname
rs("senduid")="sysop"
rs("title")="祝贺您注册成功！"
rs("sendname")="系统管理员"
rs("sdate")=now()
rs("mailtext")=zhmail
rs.update
rs.close
session("cuid")=uname
response.write"<SCRIPT language=JavaScript>alert('新用户注册成功！');"
response.write"this.location.href='commain.asp';</SCRIPT>"
end if %>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -