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

📄 admin_color.asp

📁 此文件为一个电子同学录
💻 ASP
字号:
<!--#include file =conn.asp-->
<!-- #include file="inc/const.asp" -->
<title><%=txl_info(0)%>--管理页面</title>
<!--#include file =inc/admin_css.asp-->
<meta NAME=GENERATOR Content="Microsoft FrontPage 3.0" CHARSET=GB2312>
<BODY leftmargin="0" bottommargin="0" rightmargin="0" topmargin="0" marginheight="0" marginwidth="0" bgcolor="#DDEEFF">
<%
	if not supermaster or session("flag")="" then
		Errmsg=Errmsg+"<br>"+"<li>本页面为管理员专用,请<a href=admin_index.asp target=_top>登陆</a>后进入。<br><li>您没有管理本页面的权限。"
		call txl_error()
	else
		if request("action")="save" then
			call saveconst()
		else
			call consted()
		end if
		if founderr then call txl_error()
		conn.close
		set conn=nothing
	end if

sub consted()
dim sel
%>
<table width="95%" border="0" cellspacing="1" cellpadding="3"  align=center class="tableBorder">
<form method="POST" action=admin_color.asp?action=save>
<tr> 
<th width="100%" colspan=3>当前使用模板设置</th>
</tr>
<%
dim skinname
if not isnumeric(request("skinid")) or request("skinid")="" or request("skinid")="0" then
	sqlstr=" active=1"
else
	sqlstr=" id="&request("skinid")&" "
end if
sql = "select * from config where "&sqlstr&""
set rs=conn.execute(sql)
if rs.eof and rs.bof then
	response.write "错误的系统参数,没有选择模板。"
	response.end
else
	skinname=rs("skinname")
	skinid=rs("id")
	txl_body=split(rs("txl_body"),"|||")
end if
rs.close
set rs=nothing
%>
<input type=hidden name="skinid" value="<%=skinid%>">
<tr> 
<td width="45%" class=txlrow><u>当前模板名称</u>

⌨️ 快捷键说明

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