📄 userreg.asp
字号:
<!--#include file="conn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link href="Image/Main.css" rel="stylesheet" type="text/css" />
<title>用户注册</title>
</head>
<body>
<!--#include file="top.asp"-->
<table width="760" height="14" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td></td>
</tr>
</table>
<table width="760" border="1"align="center" cellpadding="3" cellspacing="1" bordercolor="#CCCCCC" style="border-collapse: collapse">
<form action="?action=save" method="post" name="user">
<tr>
<td colspan="2" align="center" bgcolor="#eeeeee">用户注册</td>
</tr>
<tr>
<td width="20%" align="center">用户名称</td>
<td><input name="uname" type="text" id="uname">
4~12</td>
</tr>
<tr>
<td align="center">密 码</td>
<td><input name="upassword" type="password" id="upassword">
4~20</td>
</tr>
<tr>
<td align="center">姓 名</td>
<td><input name="uxingming" type="text" id="uxingming"></td>
</tr>
<tr>
<td align="center">联系电话</td>
<td><input name="utel" type="text" id="utel"></td>
</tr>
<tr>
<td align="center">地 址</td>
<td><input name="udizhi" type="text" id="udizhi"></td>
</tr>
<tr>
<td align="center">邮政编码</td>
<td><input name="uyoubian" type="text" id="uyoubian"></td>
</tr>
<tr>
<td> </td>
<td><input type="submit" name="Submit" value="提 交">
<input type="reset" name="Submit2" value="重 置"></td>
</tr>
</form>
</table>
<!--#include file="foot.asp"-->
</body>
</html>
<%
if request.querystring("action")="save"then
uname=request.form("uname")
upassword=request.Form("upassword")
uxingming=request.Form("uxingming")
utel=request.Form("utel")
udizhi=request.Form("udizhi")
uyoubian=request.Form("uyoubian")
if uname="" or len(uname)<4 or len(uname)>12 then
response.write "<SCRIPT language=JavaScript>alert('请输入用户名称，且不得小于4大于12个字！');"
response.Write"this.location.href='vbscript:history.back()';</SCRIPT>"
Response.End
end if
if upassword="" or len(upassword)<4 or len(upassword)>20 then
response.write "<SCRIPT language=JavaScript>alert('请输入密码，且不得小于4大于20个字！');"
response.Write"this.location.href='vbscript:history.back()';</SCRIPT>"
Response.End
end if
if uxingming="" then
response.write "<SCRIPT language=JavaScript>alert('请输入姓名!');"
response.Write"this.location.href='vbscript:history.back()';</SCRIPT>"
Response.End
end if
if utel="" then
response.write "<SCRIPT language=JavaScript>alert('请输入联系电话！');"
response.Write"this.location.href='vbscript:history.back()';</SCRIPT>"
Response.End
end if
if udizhi="" then
response.write "<SCRIPT language=JavaScript>alert('请输入地址！');"
response.Write"this.location.href='vbscript:history.back()';</SCRIPT>"
Response.End
end if
if uyoubian="" then
response.write "<SCRIPT language=JavaScript>alert('请输入邮政编码！');"
response.Write"this.location.href='vbscript:history.back()';</SCRIPT>"
Response.End
end if
set rs=server.CreateObject("adodb.recordset")
sql="select * from users"
rs.open sql,conn,1,3
rs.addnew
rs("uname")=uname
rs("upassword")=upassword
rs("uxingming")=uxingming
rs("utel")=utel
rs("udizhi")=udizhi
rs("uyoubian")=uyoubian
rs.update
rs.close
set rs=nothing
response.Write"<script>alert('注册完成！');location.href('index.asp');</script>"
end if
%>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -