register.asp

单班同学录 一个非常漂亮的同学录 哦

<%@LANGUAGE="VBScript" CODEPAGE="936"%>
<!--#include file="CONN.asp" -->
<!--#include file="MD5.asp" -->
<!--#include file="CHAR.asp" -->
<%
if request.ServerVariables("REQUEST_METHOD")="POST" then
	username=trim(replace(request("username"),"'",""))
	if len(username)<3 or len(username)>20 then
		errmsg=errmsg+"<br>"+"<li>请输入您的用户名(长度在3-20之间)。"
		founderr=true
	end if
	if Instr(username,"=")>0 or Instr(username,"%")>0 or Instr(username,chr(32))>0 or Instr(username,"?")>0 or Instr(username,"&")>0 or Instr(username,";")>0 or Instr(username,",")>0 or Instr(username,"'")>0 or Instr(username,",")>0 or Instr(username,chr(34))>0 or Instr(username,chr(9))>0 or Instr(username,"