看看这个！
<%response.buffer=true%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>注册：第二步</title>
<SCRIPT language=JAVASCRIPT>
<!--
function check_Null(){
if (document.form1.username.value==""){
alert("用户名不能为空!");
return false;
}
if (document.form1.password.value==""){
alert("密码不能为空!");
return false;
}
if (document.form1.password.value!=document.form1.password2.value){
alert("密码和密码确认必须一致!");
return false;
}
return true;
}
// -->
</SCRIPT>
</head>
<!--#Include file="conn_adduser.asp"-->
<body bgcolor="#F0FFE6">
<div align="center">
<center>
<table border="0" width="500">
<tr>
<td width="25%" align="center"><b><font color="#0000FF"><a href="../choose.htm">用户登录</a></font></b></td>
<td width="25%" align="center"><b><font color="#0000FF"><a href="../ywlch.htm">业务流程</a></font></b></td>
<td width="25%" align="center"><b><font color="#0000FF"><a href="../zhcyfg.htm">政策与法规</a></font></b></td>
</tr>
</table>
</center>
</div>
<hr color="#0000FF" width="980">
<div align="center">
<center>
<table border="1" width="1%" bordercolor="#800080">
<tr>
<td width="100%" align="center">
<table width="456" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td width="476" align="center" bgcolor="#FFFFFF">
<table width="457" border="0" bgcolor="#FFFFFF">
<tr>
<td height="40" align="center" width="449"><h3><font color="#AB0000">用户注册</font></h3></td>
</tr>
<tr>
<td height="30" align="center" width="449">第二步 申请用户名（注意：所有带 *
号的项目必须填写）
<hr size="1" noshade>
</td>
</tr>
</table>
</center>
<FORM name=form1 onsubmit="javascript: return check_Null();" action="" method=post>
<TABLE width="455" border=0 cellpadding="4" cellspacing="1" bgcolor="#999999" height="113">
<TR bgcolor="#FFFFFF">
<TD width="70" height="25">
<p align="center">用户名</p>
</TD>
<TD width="359" height="25" align="right">
<p align="left"><INPUT size=15 name="username" class="inputbox">
<FONT color=#990000>* </FONT><font size="2">（大于或等于5位，小于20位）</font></p>
</TD>
</TR>
<TR bgcolor="#FFFFFF">
<TD height="25" width="70">
<p align="center">密 码</p>
</TD>
<TD width="359" height="25">
<p align="left"><INPUT type=password size=15 name="password" class="inputbox">
<FONT color=#990000>* </FONT></p>
</TD>
</TR>
<TR bgcolor="#FFFFFF">
<TD height="33" width="70">
<p align="center">确认密码</p>
</TD>
<TD width="359" height="33">
<p align="left"><INPUT type=password size=15 name="password2" class="inputbox">
<FONT color=#990000>* </FONT></p>
</TD>
</TR>
</table>
<p align="center"> <input type=submit value=" 确 定 " name=submit class="inputbutton">
</FORM>
<center>
<p>
<%
'各项验证正确无误，则可继续注册，否则返回
if request("username")<>"" then
'先检验用户名是否符合规定，0表示符合规定，1表示不符合规定。exit_flag用来记载是否符合规定，temp_str记载提示信息。
Dim exit_flag,temp_str
exit_flag=0
'这里判断是否符合位数
If len(request("username"))<5 or len(request("username"))>20 Then
exit_flag=1
temp_str="<br>用户名必须大于5位小于20位"
End If
'这句话来判断一下是否已经有人使用
sql="select username from 用户 where username='" & request("username") & "'"
set rs=db.execute(sql)
If not rs.eof and not rs.bof Then
exit_flag=1
temp_str="<br>已有人使用该用户"
End If
'如果exit_flag=0表示通过服务器端验证，可以注册，否则不可以注册
IF exit_flag=0 Then
'表示可以注册
Dim username,password,type2
username=request("username")
password=request("password")
type2=request("type2")
sql="insert into 用户(username,password) values('" & username & "','" & password & "')"
db.execute(sql)
session("username")=username '用session记住用户名，以备后面update_3.asp使用。
response.redirect "add_3.asp"
Else
'表示不可以注册，必须重新填写。
response.write "<p><font color='red'>提示：" & temp_str & ",请重新填写</font></p>"
End If
end if
%>
</p>
</td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</body>
</html>