?? saveregister.asp
字號(hào):
<!--#include file="conn.asp"-->
<%
username=trim(request("username"))
pwd=trim(request("pwd"))
pwd1=trim(request("pwd1"))
tname=trim(request("tname"))
email=trim(request("email"))
nianji=trim(request("nianji"))
banji=trim(request("banji"))
function symbol_name(sn_var)
dim safety_char:symbol_name="yes":sn_var=trim(sn_var)
if sn_var="" or isnull(sn_var) or len(sn_var)>20 or instr(sn_var,"|")>0 or instr(sn_var,":")>0 or instr(sn_var,chr(9))>0 or instr(sn_var,chr(32))>0 or instr(sn_var,"'")>0 or instr(sn_var,"""")>0 then symbol_name="no":exit function
safety_char="$%#*@&=<>'`~!^()+\|:;,./?"
for i=1 to len(sn_var)
if instr(1,safety_char,mid(sn_var,i,1))>0 then symbol_name="no":exit function
next
end function
%>
<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">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>注冊(cè)信息確認(rèn)</title>
<link rel="stylesheet" type="text/css" href="css.css">
</head>
<body>
<div align="center">
<center>
<table cellspacing="1" style="border-collapse: collapse" bordercolor="#799AE1" width="400" id="AutoNumber2" border="1">
<form method="POST" action="saveregister1.asp"><tr>
<td width="100%" height="25" bgcolor="#6699CC" background="images/admin_bg_1.gif" bordercolor="#799AE1">
<p align="center"><b> <font color="#FFFFFF">用戶(hù)注冊(cè)信息確認(rèn)</font></b></td>
</tr>
<tr>
<td width="100%" height="160" bgcolor="#FFFDE8" bordercolor="#799AE1">
<p align="center"> </p>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" height="170">
<tr>
<td width="45%" height="28">
<p align="right">準(zhǔn)考證號(hào)：</td>
<td width="55%" height="28"><%
Set rs=Server.CreateObject("Adodb.RecordSet")
rs.Open "Select * from tbuser where username='"&username&"'",conn
if not rs.EOF then
Response.Write "<font color=red>該用戶(hù)名已經(jīng)存在</font>"
founder="false"
else
if symbol_name(username)<>"yes" then
founder="false"
Response.Write "<font color=red>該用戶(hù)名不符合相關(guān)規(guī)則！</font>"
else
response.write username
end if
end if%> </td>
</tr>
<tr>
<td width="45%" height="29">
<p align="right">密 碼：</td>
<td width="55%" height="29"><%if pwd<>pwd1 then
Response.Write "<font color=red>密碼不一致</font>"
founder="false"
else
response.write pwd
end if
%></td>
</tr>
<tr>
<td width="45%" height="29">
<p align="right">姓 名：</td>
<td width="55%" height="29"><%=tname%></td>
</tr>
<tr>
<td width="45%" height="29">
<p align="right">電子郵箱：</td>
<td width="55%" height="29"><%if instr(email,"@")=0 then
Response.Write "<font color=red>格式不正確</font>"
founder="false"
else
if instr(email,".")=0 then
Response.Write "<font color=red>格式不正確</font>"
founder="false"
else
response.write email
end if
end if
%></td>
</tr>
<tr>
<td width="45%" height="29">
<p align="right">年 級(jí)：</td>
<td width="55%" height="29"><%=nianji%>級(jí) </td>
</tr>
<tr>
<td width="45%" height="29">
<p align="right">班 級(jí)：</td>
<td width="55%" height="29"><%=banji%></td>
</tr>
</table>
<p align="center"> </p>
</td>
</tr> <input type="hidden" value="<%=username%>" name="username" >
<input type="hidden" value="<%=pwd%>" name="pwd" >
<input type="hidden" value="<%=tname%>" name="tname" >
<input type="hidden" value="<%=email%>" name="email" >
<input type="hidden" value="<%=nianji%>" name="nianji" >
<input type="hidden" value="<%=banji%>" name="banji" >
<tr>
<td width="100%" height="25" bgcolor="#FFFDE8" bordercolor="#799AE1">
<p align="center">
<% if founder="false" then%>
<input type="button" value="返 回" name="B3" class="s02" onclick="window.location='register.asp?username=<%=username%>&tname=<%=tname%>&email=<%=email%>&banji=<%=banji%>&nianji=<%=cstr(nianji)%>'"></td>
<%else%>
<input type="submit" value="確 認(rèn)" name="B3" class="s02" >
<%end if%>
</tr></form>
</table>
</center>
</div>
</body>
</html>?? 快捷鍵說(shuō)明
復(fù)制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號(hào)
Ctrl + =
減小字號(hào)
Ctrl + -