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

📄 sys.asp

📁 一个超级漂亮的班级主页asp代码
💻 ASP
字号:
<!--插入html头部分以及数据库接口-->
<!--#include file="in_conn.asp"-->
<!--#include file="inc/md5.asp"-->

<body>
<!--插入网站置顶-->
<% if u_name="" then
	Response.Redirect "log_err.asp"
else
%>
<!--#include file="in_topmb.asp"-->
<% end if %>

<%
if u_power<2 OR u_name<>DEF_sysadm then
	Response.Redirect "resp.asp?cmd=adm_bigpower"
end if

IF Session("sys")="" OR Session("sys")<>DEF_sysadm THEN

	'后台登录安全检查
	dim vsys_user,vsys_pwd
	vsys_user=""
	vsys_pwd=""
	vsys_user=trim(Request.Form("slogname"))
	vsys_pwd=trim(Request.Form("slogpwd"))
	
	IF vsys_user<>DEF_sysadm THEN
		Response.Redirect("sys_confirm.asp?err=yes")
	ELSE
		sqlstr="SELECT name,pwd FROM tblmates WHERE name='"&stryin(DEF_sysadm)&"'"
		rs.open sqlstr,conn,1,1
			if rs.eof AND rs.bof then
				Response.Redirect "log_err.asp?cmd=name_notfound"
			end if
			'MD5加密
			lpwd=md5(vsys_pwd,32)
			if lpwd<>rs("pwd") then
				Response.Redirect "sys_confirm.asp?err=yes"
			else
				Session("sys")=DEF_sysadm
			end if
		rs.close
	END IF

END IF
%>


<table align="center" width="700" height="25" border="0" cellspacing="0" cellpadding="0" class="rdbar"><tr>
	<td width="100%" height="100%">
		&nbsp;<a href="index.asp">[首页]</a>-<font class="ft1">后台维护</font>
	</td>
</tr></table>


<table align="center" width="700" height="101" border="0" cellspacing="0" cellpadding="6" class="rdd">
	<tr>
		<td width="150" valign="top" class="rdk2">
			<!--插入左部分-->
			<!--#include file="in_sys_left.asp"-->
		</td>
		<td valign="top">
			登录后台成功,请选择左栏相应的管理项目。
		</td>
	</tr>
</table>

<!--插入在线统计-->
<!--#include file="in_online.asp"-->
<!--插入网站置底-->
<!--#include file="in_bottom.asp"-->
</body>

</html>

⌨️ 快捷键说明

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