📄 admin_setup.asp
字号:
<!--#include file="Include/xbqq_Setup.asp"-->
<!--#include file="Conn.asp"-->
<!--#include file="include/char.asp" -->
<!--#include file="Include/check.asp"-->
<!--#include FILE="Include/Admin_Function.asp"-->
<%
action =trim(Request("action"))
if action="ok" then
Gaobei_Title = trim(Request.form("Gaobei_Title"))
Gaobei_description = trim(Request.form("Gaobei_description"))
Gaobei_http = trim(Request.form("Gaobei_http"))
Gaobei_line_H = trim(Request.form("Gaobei_line_H"))
Gaobei_Logo = trim(Request.form("Gaobei_Logo"))
Gaobei_Banner = trim(Request.form("Gaobei_Banner"))
Gaobei_qqonline = trim(Request.form("Gaobei_qqonline"))
xbqq_nc = trim(Request.form("xbqq_nc"))
NeedCheck = trim(Request.form("NeedCheck"))
news_permission = trim(Request.form("news_permission"))
imageswidth = trim(Request.form("imageswidth"))
imagesheight = trim(Request.form("imagesheight"))
Gaobeidb_All = trim(Request.form("Gaobeidb_All"))
switch_onlingQQ = trim(Request.form("switch_onlingQQ"))
switch_softdown = trim(Request.form("switch_softdown"))
switch_picshow = trim(Request.form("switch_picshow"))
voteincdir = server.mappath("Include/xbqq_Setup.asp")
Const ForReading =1, ForWriting = 2
set fs = CreateObject("Scripting.FileSystemObject")
set ts = fs.OpenTextFile(voteincdir,ForWriting, True)
ts.Write ""
ts.Write "<"
ts.Write "%"& vbCrLf
ts.Write " Gaobei_Title= "&""""&Gaobei_Title&""""& vbCrLf
ts.Write " Gaobei_description= "&""""&Gaobei_description&""""& vbCrLf
ts.Write " Gaobei_http= "&""""&Gaobei_http&""""& vbCrLf
ts.Write " Gaobei_line_H= "&""""&Gaobei_line_H&""""& vbCrLf
ts.Write " Gaobei_Logo= "&""""&Gaobei_Logo&""""& vbCrLf
ts.Write " Gaobei_Banner = "&""""&Gaobei_Banner &""""& vbCrLf
ts.Write " Gaobei_qqonline = "&""""&Gaobei_qqonline &""""& vbCrLf
ts.Write " xbqq_nc = "&""""&xbqq_nc &""""& vbCrLf
ts.Write " NeedCheck= "&""""&NeedCheck&""""& vbCrLf
ts.Write " imageswidth= "&""""&imageswidth&""""& vbCrLf
ts.Write " imagesheight= "&""""&imagesheight&""""& vbCrLf
ts.Write " Gaobeidb_All= "&""""&Gaobeidb_All&""""& vbCrLf
ts.Write " switch_onlingQQ= "&""""&switch_onlingQQ&""""& vbCrLf
ts.Write " switch_softdown= "&""""&switch_softdown&""""& vbCrLf
ts.Write " switch_picshow= "&""""&switch_picshow&""""& vbCrLf
ts.Write "%"
ts.Write ">"
ts.close
response.write "<script language=javascript>"
response.write "alert('系统相关设置成功！');"
response.write "</script>"
end if
%>
<HTML>
<HEAD>
<TITLE>后台管理-相关参数设置</TITLE>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="other/admin.css" rel="stylesheet" type="text/css">
</HEAD>
<BODY bgColor=#FFFFFF topMargin=3 leftmargin="2">
<table width="95%" border="0" align=center cellpadding="2" cellspacing="1" bgcolor="#CCCCCC" class=list1 height="521">
<form name="form1" method="post" action="http://www.kuhang.cn">
<tr bgcolor="#EAEAEA">
<td height="23" colspan=2> <div align="left"><font color="#FFFFFF"><b><font color="#000000">○
基本设置 </font></b></font></div></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="19%" height="25"> <div align="left">网站名称： </div></td>
<td width="79%"> <input type="text" name="Gaobei_Title" class="button1" size="40" value="<%=Gaobei_Title%>">
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="19%" height="25" align=left> 网站标题显示： </td>
<td width="79%" align=left> <input name="Gaobei_description" type="text" class="button1" id="Gaobei_description" value="<%=Gaobei_description%>" size="40">
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="19%" height="25" align=left> 主页地址： </td>
<td width="79%" align=left> <input name="Gaobei_http" type="text" class="button1" id="Gaobei_http" value="<%=Gaobei_http%>" size="40">
<font color="#FF0000">不要加 Http://</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="19%" height="25" align=left> 字体行距： </td>
<td width="79%" align=left> <input name="Gaobei_line_H" type="text" class="button1" id="Gaobei_line_H" value="<%=Gaobei_line_H%>" size="40">
<font color="#FF0000">如：150%</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" align=left>滚动公告：</td>
<td align=left><input type="text" name="Gaobei_Logo" class="button1" size="40" value="<%=Gaobei_Logo%>"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" align=left>BANNER：</td>
<td align=left><input type="text" name="Gaobei_Banner" class="button1" size="40" value="<%=Gaobei_Banner%>"></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" align=left>BANNER上传：</td>
<td align=left><iframe frameborder=0 width=290 height=25 scrolling=no src="upload.asp?action=banner"></iframe></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" align=left>在线QQ：</td>
<td align=left><input type="text" name="Gaobei_qqonline" class="button1" size="40" value="<%=Gaobei_qqonline%>">
<font color="#FF0000">多个QQ号用逗号(,)分开</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" align=left>
<p>QQ呢称：</td>
<td align=left>
<input type="text" name="xbqq_nc" class="button1" size="40" value="<%=xbqq_nc%>">
<font color="#FF0000">多个昵称用逗号(,)分开</font></td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" align=left>数据库地址：</td>
<td align=left><input type="text" name="Gaobeidb_All" class="button1" size="40" value="<%=Gaobeidb_All%>">
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" align=left>注册是否要审核：</td>
<td align=left><input name="NeedCheck" type="radio" id="NeedCheck" value="1" <% if NeedCheck=1 then%>checked <% end if %> style=border:0px>
是
<input name="NeedCheck" type="radio" id="NeedCheck" value="0" <% if NeedCheck=0 then%>checked <% end if %> style=border:0px>
否</td>
</tr>
<tr bgcolor="#FFFFFF">
<td width="19%" height="25" align=left> 缩小图片参数：</td>
<td width="79%" align=left> 宽：
<input type="text" name="imageswidth" class="button1" size="10" value="<%=imageswidth%>">
高：
<input type="text" name="imagesheight" class="button1" size="10" value="<%=imagesheight%>">
</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" align=left>打开在线QQ：</td>
<td align=left><input name="switch_onlingQQ" type="radio" id="switch_onlingQQ" value="1" <% if switch_onlingQQ=1 then%>checked <% end if %> style=border:0px>
是
<input name="switch_onlingQQ" type="radio" id="switch_onlingQQ" value="0" <% if switch_onlingQQ=0 then%>checked <% end if %> style=border:0px>
否</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" align=left>首页显示最新下载调用：</td>
<td align=left><input name="switch_softdown" type="radio" id="switch_softdown" value="1" <% if switch_softdown=1 then%>checked <% end if %> style=border:0px>
是
<input name="switch_softdown" type="radio" id="switch_softdown" value="0" <% if switch_softdown=0 then%>checked <% end if %> style=border:0px>
否</td>
</tr>
<tr bgcolor="#FFFFFF">
<td height="25" align=left>首页显示最新图片调用：</td>
<td align=left><input name="switch_picshow" type="radio" id="switch_picshow" value="1" <% if switch_picshow=1 then%>checked <% end if %> style=border:0px>
是
<input name="switch_picshow" type="radio" id="switch_picshow" value="0" <% if switch_picshow=0 then%>checked <% end if %> style=border:0px>
否</td>
</tr>
<tr bgcolor="#F3F3F3">
<td height="51" colspan="2" align=left valign="bottom"> <div align="center">
<input type="submit" name="Submit" value=" 设 置 " class="button2"><input type="reset" name="Submit" value=" 重 置 " class="button2">
</div></td>
</tr>
</form>
</table>
<br>
</BODY>
</HTML>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -