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

📄 config.asp

📁 这是我根据动网新闻核心自行设计的校园新闻系统
💻 ASP
字号:
<%
pageadmin=10
%>
<!--#include file="../login/check.asp" -->
<!-- #include file="../../inc/conn.asp" -->
<!-- #include file="../../inc/function.asp" -->
<!--#include file="../category/category_class.asp"-->
<!--#include file="../template/template_class.asp" -->
<%
Dim rs
Dim openwindow
Dim windowwidth
Dim windowheight
Dim source
Dim writer
set rs=conn.execute("select * from webconfig")
if not rs.eof then
	openwindow=rs("openwindow")
	windowwidth=rs("windowwidth")
	windowheight=rs("windowheight")
	source=rs("source")
	writer=rs("writer")
	template=rs("template")
	moretemplate=rs("moretemplate")
end if	
%><head>
<link rel="stylesheet" type="text/css" href="../../inc/lbstyle.css">
</head>


<div align="center">
	<form method="POST" name="form1" action="config_save.asp">
		<table border="1" width="100%" id="table1" class="table">
			<tr style="display:none">
			  <td class="lefttd" align="center">更多内容列表模板:</td>
			  <td class="righttd">&nbsp;
			  <select class="select" name="moretemplate" size="">
			  <%
			  Dim tp
			  Set tp=new LBTemplate
			  tp.categorytype="新闻模板"
			  tp.downlistselected(moretemplate)
			  %>
			  </select> *搜索内容页面使用同一模板</td>
			</tr>
			<tr>
			  <td class="lefttd" align="center">新闻内容显示模板:</td>
			  <td class="righttd">&nbsp;
			  <select class="select" name="template" size="">
			  <%
			  tp.downlistselected(template)
			  Set tp=Nothing
			  %>
			  </select></td>
			</tr>
			<tr>
				<td width="194" class="lefttd" style="text-align: center">
				新闻窗口设置:</td>
				<td class="righttd">
				<table border="0" id="table2" width="100%">
					<tr>
						<td width="232">&nbsp;<input type="radio" value="_blank" name="openwindow"<%if openwindow="_blank" then response.write " checked"%> onclick="cwin();">新窗口&nbsp; 
						<input type="radio" value="_self" name="openwindow" onclick="cwin();"<%if openwindow="_self" then response.write " checked"%>>本窗口&nbsp; 
						<input type="radio" value="jsopen" name="openwindow" onclick="cwin();"<%if openwindow="jsopen" then response.write " checked"%>>弹出新窗口 
						</td>
						<td style="display:none;" id=winconf>宽:<input type="text" name="windownwidth" size="5" class="text" value="<%=windowwidth%>"> 
						高:<input type="text" name="windownheight" size="5" class="text" value="<%=windowheight%>"></td>
					</tr>
				</table>
				</td>
			</tr>
			<tr>
				<td width="194" class="lefttd" style="text-align: center">默认来源:</td>
				<td class="righttd">&nbsp;
				<input type="text" name="source" size="28" class="text" value="<%=source%>"></td>
			</tr>
			<tr>
				<td width="194" class="lefttd" style="text-align: center">默认作者:</td>
				<td class="righttd">&nbsp;
				<input type="text" name="writer" size="28" class="text" value="<%=writer%>"></td>
			</tr>
		</table>
		<p><input type="submit" value="提交" name="B1" class="button">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
		<input type="reset" value="重置" name="B2" class="button"></p>
	</form>
</div>
<Script>
function cwin()
{
if(document.form1.openwindow[2].checked)
{
	winconf.style.display="";
}
else
	{
		winconf.style.display="none";
	}
}
</Script><%conn.close
set conn=nothing
set ct=nothing%>

⌨️ 快捷键说明

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