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

📄 manage.asp

📁 zheng fu wang zhan gong neng qi quan
💻 ASP
字号:
<!--#include file="conn.asp" -->
<!--#include file="ConnUser.asp" -->
<!--#include file="config.asp" -->
<!--#include file="char.inc"-->
<!--#include file="ChkUser.asp"-->
<script language=javascript>
function CheckFormUserLogin()
{
	if(document.UserLogin.UserName.value=="")
	{
		alert("请输入用户名!");
		document.UserLogin.UserName.focus();
		return false;
	}
	if(document.UserLogin.Passwd.value == "")
	{
		alert("请输入密码!");
		document.UserLogin.Passwd.focus();
		return false;
	}
	if(document.UserLogin.verifycode.value == "")
	{
		alert("请输入验证码!");
		document.UserLogin.verifycode.focus();
		return false;
	}
}
</script>
<%
response.cookies(eChuang)("ManageUserName")=""
response.cookies(eChuang)("ManageKEY")=""
response.cookies(eChuang)("ManagePurview")=""
response.cookies(eChuang)("ManageFullName")=""
response.cookies(eChuang)("ManageReglevel")=""
showerr=request("showmess")

Function getcode1()
	Dim test
	On Error Resume Next
	Set test=Server.CreateObject("Adodb.Stream")
	Set test=Nothing
	If Err Then
		Dim zNum
		Randomize timer
		zNum = cint(8999*Rnd+1000)
		Session("verifycode") = zNum
		getcode1= Session("verifycode")		
	Else
		getcode1= "<img src=""getcode.asp"">"		
	End If
End Function
%>
<html><head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<LINK href="news.css" rel="stylesheet">
<title><%=copyright%><%=version%><%=ver%>_酷源码下载 kyuanma.Com</title>
</head>
<body>
<table width="400" border="0" align="center" cellpadding="3" cellspacing="0" bgcolor="#F1C709">
<form method="POST" action="ChkManageLogin.asp" name="UserLogin" onSubmit="return CheckFormUserLogin();">
<tr >
	<td height="67" colspan="2" align="center" background="images/admin_topbg.gif" >
		<%=copyright%>&nbsp;<%=version%>&nbsp;<%=ver%>
	</td>
</tr>
<tr>
	<td height="37" colspan="2" align="center" class="TDtop">┊ 管 理  登 录┊</td>
</tr>
<tr>
	<td width="45%" align="right">用户名:</td>
	<td width="55%" align="left">
		<input name="UserName" size="15">
	</td>
</tr>
<tr>
	<td align="right">密&nbsp;&nbsp;码:</td>
	<td align="left">
		<input type="password" name="Passwd" size="15">
	</td>
</tr>
<tr>
	<td align="right">验证码:</td>
	<td align="left">
		<input type="text" name="verifycode" size="15">
		<%=getcode1()%>
	</td>
</tr>
<%if showerr<>"" then%>
<tr>
	<td colspan="2" align="center">
		<%=showerr%>
	</td>
</tr>
<%end if%>
<tr>
	<td colspan="2" align="center">
			<input type="submit" name="Submit" value="确定" style="font-size: 9pt;  color: #000000; background-color: #EAEAF4; solid #EAEAF4" onMouseOver ="this.style.backgroundColor='#ffffff'" onMouseOut ="this.style.backgroundColor='#EAEAF4'" title="确定">&nbsp;
			<input type="reset" name="Submit2" value="重置" style="font-size: 9pt;  color: #000000; background-color: #EAEAF4; solid #EAEAF4" onMouseOver ="this.style.backgroundColor='#ffffff'" onMouseOut ="this.style.backgroundColor='#EAEAF4'" title="重输">
	</td>
</tr>
</form>
</table>
</body>
</html>
<%response.end%>

⌨️ 快捷键说明

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