⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 checkreg.asp

📁 这是一套基于WEB的网站管理系统
💻 ASP
字号:
<!--#include file="config.asp"-->
<%
Dim Rs
Dim CheckTitle,strUserName,strMessage
If Newasp.IsValidStr(Request("username")) = False Then
	strMessage = "<li>用户中含有非法字符!</li>"
	CheckTitle = "出错啦!"
	Founderr = True
Else
	strUserName = Trim(Request("username"))
End If
If Founderr = False Then
	Set Rs = Newasp.Execute("select username from NC_User where username = '" & strUserName & "'")
	If Not (Rs.bof And Rs.EOF) Then
		CheckTitle = "出错啦!"
		strMessage =  "<li>Sorry!此用户已经存在,请换一个用户名再试!</li>"
	Else
		CheckTitle = "出错啦!"
		strMessage =  "<li><font color=red><b>" & strUserName & "</b></font> 尚未被人使用,赶紧注册吧!</li>"
	End If
	Rs.Close:Set Rs = Nothing
End If
%>
<html>
<head>
<title>用户名检测</title>
<meta http-equiv=Content-Type content=text/html; charset=gb2312>
<link href=user_style.css rel=stylesheet type=text/css>
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<table width="320" border=0 align=center cellpadding=3 cellspacing=1 style="border: 1px #3795D2 solid ; background-color: #FFFFFF;font: 12px;">
<tr>
	<th style="background-color: #3795D2;color: white;font-size: 12px;font-weight:bold;height: 26;"><%=CheckTitle%></th>
</tr>
<tr>
	<td style="background-color:#F7F7F7;font-size: 12px;height: 20;color:blue">&nbsp;&nbsp;<span id=jump>8</span> 秒钟后系统将自动关闭本窗口</td>
</tr>
<tr>
	<td style="background-color:#F7F7F7;font-size: 12px;height: 42;"><%=strMessage%></td>
</tr>
<tr>
	<td align=center style="background-color:#F0F0F0;font-size: 12px;height: 20;">【<a href='javascript:onclick=window.close()'>关闭本窗口</a>】</td>
</tr>
</table>
<script language="JavaScript">
function countDown(secs){
	jump.innerText=secs;if(--secs>0)setTimeout("countDown("+secs+")",1000);
}
countDown(8);
setTimeout('window.close();', 8000);
</script>
</body>
</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -