📄 reg.asp
字号:
<%MDBpath="../inc/"%>
<!--#include file="../inc/mdb_path_user.asp"-->
<%
action=request("action")
user=request("user")
pwd=request("pwd")
email=request("email")
face=request("face")
sex=request("sex")
homepage=request("homepage")
softurl=request("softurl")
oicq=request("oicq")
qm=request("qm")
leibie=request("leibie")
if action="add_wz" then
if user="" or pwd="" or email="" or face="" then
Response.Write "<script language=JavaScript>" & chr(13) & "alert('表单填写不完整！');" & "history.back()" & "</script>"
Response.End
end if
sql = "Select * From userinfo Where user = '"&User&"'"
set rs = conn.Execute(sql)
If Not rs.EOF Then
response.write "<script language=JavaScript>" & chr(13) & "alert('此用户名已经有人使用了！');" & "history.back()" & "</script>"
Response.End
End If
if Session("lastaddedwz")<>user then
set rss=server.createobject("adodb.recordset")
rss.open "select * from userinfo",conn,1,3
rss.addnew
rss("user")=user
rss("pwd")=pwd
rss("face")=face
rss("sex")=sex
rss("homepage")=homepage
rss("softurl")=softurl
rss("oicq")=oicq
rss("email")=email
rss("qm")=qm
rss("v_pstatus")=0
rss("regdate")=now()
rss("dj")=2
rss.update
rss.close
set rss=nothing
Session("lastaddedwz")=user
Response.Write "<Script Language=Javascript>window.alert('注册用户成功!');location.href='login.asp';</Script>"
Response.Write "</td></tr></table>"
Response.End
end if
end if
%>
<html><head>
<meta http-equiv='Content-Type' content='text/html; charset=gb2312'>
<meta name='Keywords' content='新用户注册'>
<meta name='Description' content='新用户注册'>
<LINK href=../inc/style.css rel=stylesheet>
<title>新用户注册</title>
</head>
<body topmargin=0 leftmargin=0>
<center>
<!--#include file="../inc/top.asp"-->
<table border=0 cellpadding=0 cellspacing=0 width=760 align=center bgcolor=#ffffff>
<tr valign=top><td width=180 >
<!--#include file="left.asp"-->
</td><td width=600>
<script id=clientEventHandlersJS language=javascript>
<!--
function CheckForm()
{
if (document.form.user.value==""){
alert("用户名不能为空！");
document.form.Name.focus();
return false;
}
if (document.form.pwd.value==""){
alert("密码不能为空！");
document.form.HomePage.focus();
return false;
}
if (document.form.Email.value==""){
alert("Email不能为空！");
document.form.Email.focus();
return false;
}
Email=form.Email.value
if (Email!=null) {
if (Email.charAt(0)=="@") {
alert("请填入有效的Email地址!")
return false
}
var j=0,k=0
for (i=0;i<Email.length;i++) {
var oneChar=Email.charAt(i)
if (oneChar=="@") j=i
if (oneChar==".") k=i
}
if (k<j || k==0 || j==0 || k==j+1) {
alert("请填入有效的Email地址!")
return false;
}
}
return true;
}
-->
</script>
<table width="580" border="0" cellspacing="0" cellpadding="0"><tr>
<td height=10></b>
</td> </tr> <tr> <td>
<table border="0" cellspacing="1" cellpadding="0" width="580" bgcolor="#e6e6e6">
<form action="reg.asp" method=POST name=form onSubmit="return CheckForm()">
<tr>
<td width="100%" bgcolor="#3FAEE4" height=26>
<table border="0" cellpadding="0" cellspacing="0" width="100%">
<tr>
<td width="100%" height=26> <font color="#FFFFFF"><b>新用户注册</b></font></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%" bgcolor="#FFFFFF" height="24"> 用 户 名：<input maxLength="20" name="user" size="15" style="border: 1 solid #808080"> *</td>
</tr>
<tr>
<td width="100%" bgcolor="#F7f7f7" height="24"> 原 密 码：<input name="pwd" size="15" style="border: 1 solid #808080" type="password"> *</td>
</tr>
<tr>
<td width="100%" bgcolor="#FFFFFF" height="24"> 真实姓名：<input name="face" size="15" style="border: 1 solid #808080"> *</td>
</tr>
<tr>
<td width="100%" bgcolor="#F7F7F7" height="24"> 性 别：<select size="1" name="sex">
<option selected value="男">男</option>
<option selected value="女">女</option>
</select></td>
</tr>
<tr>
<td width="100%" bgcolor="#FFFFFF" height="24"> 联系电话：<input name="homepage" size="15" style="border: 1 solid #808080"></td>
</tr>
<tr>
<td width="100%" bgcolor="#F7F7F7" height="24"> 电子邮箱：<input name="email" size="32" style="border: 1 solid #808080">*</td>
</tr>
<tr>
<td width="100%" bgcolor="#FFFFFF" height="24"> 身份证号：<input name="softurl" size="32" style="border: 1 solid #808080"></td>
</tr>
<tr>
<td width="100%" bgcolor="#F7F7F7" height="24"> 邮政编码：<input name="oicq" size="15" style="border: 1 solid #808080"></td>
</tr>
<tr>
<td width="100%" bgcolor="#FFFFFF" height="90"> 详细地址：<textarea rows="4" name="qm" cols="60" style="border: 1 solid #808080"></textarea><font color="#808080"><br> 250字符内,不支持HTML语言.</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="30">
<input type="hidden" name="action" value="add_wz">
<input type="submit" value=" 提 交 " style="FONT-SIZE: 9pt">
</td>
</tr>
</table>
</td>
</tr><tr><td height="100"></td></tr>
</table>
</td>
</tr>
</form></table>
<!--#include file="../inc/foot.asp"-->
</body></html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -