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

📄 admin_sysconfig.asp

📁 后台管理系统
💻 ASP
📖 第 1 页 / 共 2 页
字号:
<!--#include file="inc/inc.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="JavaScript" src="Inc/admin.js"></SCRIPT>
<link href="../file/css.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0">
<%
ClsPub.Chk_Post()
ClsPub.SysConfig()
  ClsPub.DelCahe("SysConfig")
Dim Action
Action=ClsPub.SafeRequest(3,"Action",1,0,0)
Select Case Action
	Case "SaveConfig"
		Call SaveConfig()
	Case Else
		Call ShowConfig()
End Select

Sub ShowConfig
%><iframe width="260" height="165" id="colourPalette" src="images/nc_selcolor.htm" style="visibility:hidden; position: absolute; left: 0px; top: 0px;border:1px gray solid" frameborder="0" scrolling="no" ></iframe>
    <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1" class="table" style="display:none;">
<form method="POST" action="Admin_SysConfig.asp?Action=SaveConfig" id="form1" name="form1">
    <tr> 
      <td height="22" colspan="2" class="title"><a name="ShopInfo"></a>
		系统基本设置&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;</td>	 
    </tr>
    <tr> 
      <td width="972" height="25" class="tablerow2" colspan="2" align="left"><b>注意:每项目设置均不能出现"<font color="red">|||</font>"字符串.</b></td>
    </tr>
    <tr> 
      <td width="330" height="25" class="tablerow2">网站名称:</td>
      <td width="642" height="25" class="tablerow2"> 
        <input name="Setting0" type="text" id="Setting0" value="<%=ClsPub.TW_Config(0)%>" size="40" maxlength="50">
      </td>
    </tr>
    <tr> 
      <td width="330" height="25" class="title3">网站标题:</td>
      <td width="642" height="25" class="title3"> 
        <input name="Setting1" type="text" id="Setting1" value="<%=ClsPub.TW_Config(1)%>" size="40" maxlength="50">
      </td>
    </tr>
    <tr> 
      <td width="330" height="25" class="tablerow2">站点网址:</td>
      <td width="642" height="25" class="tablerow2"> 
        <input name="Setting2" type="text" id="Setting2" value="<%=ClsPub.TW_Config(2)%>" size="40" maxlength="50">
      </td>
    </tr>
    <tr> 
      <td width="330" height="25" class="title3">网站关键字:</td>
      <td width="642" height="25" class="title3"> 
        <input name="Setting3" type="text" id="Setting3" value="<%=ClsPub.TW_Config(3)%>" size="40" maxlength="50">
      </td>
    </tr>
    <tr> 
      <td width="330" height="25" class="tablerow2">网站描述:</td>
      <td width="642" height="25" class="tablerow2"> 
        <textarea name="Setting4" cols="40" rows="4" id="Setting4"><%=ClsPub.TW_Config(4)%></textarea>
        <br>&nbsp;<a href="javascript:change(document.all.Setting4,-20)"><img src="images/jian.gif" border=0></a>&nbsp;&nbsp;<a href="javascript:change(document.all.Setting4,20)"><img src="images/jia.gif" border=0></a>
      </td>
    </tr>
    <tr> 
      <td width="330" height="25" class="title3">Logo地址:</td>
      <td width="642" height="25" class="title3"> 
        <input name="Setting5" type="text" id="Setting5" value="<%=ClsPub.TW_Config(5)%>" size="40" maxlength="100">
      </td>
    </tr>
    <tr> 
      <td width="330" height="25" class="tablerow2">Banner 地址:</td>
      <td width="642" height="25" class="tablerow2"> 
        <input name="Setting6" type="text" id="Setting6" value="<%=ClsPub.TW_Config(6)%>" size="40" maxlength="100">
      </td>
    </tr>
    <tr> 
      <td width="330" height="25" class="title3">网站底部信息(支持Html):</td>
      <td width="642" height="25" class="title3"> 
        <textarea name="Setting7" cols="40" rows="4" id="Setting7"><%=ClsPub.TW_Config(7)%></textarea>
                <br>&nbsp;<a href="javascript:change(document.all.Setting7,-20)"><img src="images/jian.gif" border=0></a>&nbsp;&nbsp;<a href="javascript:change(document.all.Setting7,20)"><img src="images/jia.gif" border=0></a>
      </td>
    </tr>
    <tr> 
      <td width="330" height="25" class="tablerow2">管理员:</td>
      <td width="642" height="25" class="tablerow2"> 
        <input name="Setting8" type="text" id="Setting8" value="<%=ClsPub.TW_Config(8)%>" size="40" maxlength="255">
      </td>
    </tr>
    <tr> 
      <td width="330" height="25" class="title3">管理员邮箱:</td>
      <td width="642" height="25" class="title3"> 
        <input name="Setting9" type="text" id="Setting9" value="<%=ClsPub.TW_Config(9)%>" size="40" maxlength="255">
      </td>
    </tr>
    <tr> 
      <td width="330" height="25" class="tablerow2">系统当前模板:<br>即当前模板在Templates中的文件夹名.</td>
      <td height="25" class="tablerow2"> 
        <input name="Setting10" type="text" id="Setting10" value="<%=ClsPub.TW_Config(10)%>" size="40" maxlength="255"></td>
    </tr>
    <tr> 
      <td width="330" height="25" class="tablerow2">网站当前状态:</td>
      <td height="25" class="tablerow2"> 
        <input type="radio" name="Setting11" value="1" <%If Clng(ClsPub.TW_Config(11))=1 Then Response.Write "checked"%>> 
        打开 &nbsp;&nbsp;&nbsp;&nbsp;
        <input type="radio" name="Setting11" value="0" <%If Clng(ClsPub.TW_Config(11))=0 Then Response.Write "checked"%>>关闭 
        </td>
    </tr>
    
    <tr> 
      <td width="330" height="25" class="title3">关闭信息:</td>
      <td width="642" height="25" class="title3"> 
        <textarea name="Setting12" cols="40" rows="4" id="Setting12"><%=ClsPub.TW_Config(12)%></textarea>
                <br>&nbsp;<a href="javascript:change(document.all.BottomStr,-20)"><img src="images/jian.gif" border=0></a>&nbsp;&nbsp;<a href="javascript:change(document.all.BottomStr,20)"><img src="images/jia.gif" border=0></a>
      </td>
    </tr>
    <tr> 
      <td width="330" height="25" class="tablerow2">是否开启IP屏蔽功能:</td>
      <td height="25" class="tablerow2"> 
       <input type="radio" name="Setting13" value="1" <%If Clng(ClsPub.TW_Config(13))=1 Then Response.Write "checked"%>> 
        是 &nbsp;&nbsp;&nbsp;&nbsp;
        <input type="radio" name="Setting13" value="0" <%If Clng(ClsPub.TW_Config(13))=0 Then Response.Write "checked"%>>否 
        </td>
    </tr>
    
    
    <table  border="0" align="center" cellpadding="2" cellspacing="1" class="tableBorder">
<tr> 
      <th height="25" colspan="2" class="title"><a name="ShopOption"></a>
		上传文件设置</th>
    </tr>
   <tr>
	<td class="tablerow2" ><U>选取上传组件:</U><br>如果系统支持的话,建议使用Aspupload3.0组件</td>
	<td class="tablerow2" >
	<select name="Setting14" id="Setting14" onChange="chkselect(options[selectedIndex].value,'know2');" size="1">
	<option value="999" <%If Clng(ClsPub.TW_Config(14))=999 Then Response.Write "Selected"%>>关闭
	<option value="0" <%If Clng(ClsPub.TW_Config(14))=0 Then Response.Write "Selected"%>>无组件上传类
	<option value="1" <%If Clng(ClsPub.TW_Config(14))=1 Then Response.Write "Selected"%>>Aspupload3.0组件 
	<option value="2" <%If Clng(ClsPub.TW_Config(14))=2 Then Response.Write "Selected"%>>SA-FileUp 4.0组件
	<option value="3" <%If Clng(ClsPub.TW_Config(14))=3 Then Response.Write "Selected"%>>DvFile-Up V1.0组件
	<option value="4" <%If Clng(ClsPub.TW_Config(14))=4 Then Response.Write "Selected"%>>IronSoft.Upload组件 
	<option value="5" <%If Clng(ClsPub.TW_Config(14))=5 Then Response.Write "Selected"%>>LyfUpload.UploadFile组件
	<option value="6" <%If Clng(ClsPub.TW_Config(14))=6 Then Response.Write "Selected"%>>w3.Upload组件

	</option></select><div id="know2"></div>
	</td>
</tr>
<tr> 
	<td class="tablerow2"Highlight><U>选取生成预览图片组件:</U></td>
	<td class="tablerow2"Highlight> 
	<select name="Setting15" id="Setting15" onChange="chkselect(options[selectedIndex].value,'know3');" size="1">
	<option value="999" <%If Clng(ClsPub.TW_Config(15))=999 Then Response.Write "Selected"%>>关闭
	<option value="0" <%If Clng(ClsPub.TW_Config(15))=0 Then Response.Write "Selected"%>>CreatePreviewImage组件
	<option value="1" <%If Clng(ClsPub.TW_Config(15))=1 Then Response.Write "Selected"%>>AspJpeg组件
	<option value="2" <%If Clng(ClsPub.TW_Config(15))=2 Then Response.Write "Selected"%>>SA-ImgWriter组件
	</select><div id="know3"></div>
	</td>
</tr>
 <tr> 
	<td class="tablerow2"Highlight><U>文件大小限制</U></td>
	<td class="tablerow2"Highlight> 
	<input type="text" name="Setting16" size="6" value="<%=ClsPub.TW_Config(16)%>">&nbsp;KB
	</td>
	<input type="hidden" id="Forum_FaceUploadSize" value="<b>头像文件大小帮助:</b><br><li>限制上传头像文件的大小。<li>用户头像除上传限制外,请查看“用户选项”相关设置。">
</tr>
    <tr> 
	<td class="tablerow2"Highlight><U>文件类型限制</U><br>每种类型请使用","分隔开</td>
	<td class="tablerow2"Highlight> 
	<input type="text" name="Setting17" size="65" value="<%=ClsPub.TW_Config(17)%>">&nbsp;</td>
	<input type="hidden" id="Forum_FaceUploadSize" value="<b>头像文件大小帮助:</b><br><li>限制上传头像文件的大小。<li>用户头像除上传限制外,请查看“用户选项”相关设置。">
</tr>
<tr> 
<td class="tablerow2"Highlight><U>一次上传最大个数</U></td>
<td class="tablerow2"Highlight>
<input type=text name="Setting18" value="<%=ClsPub.TW_Config(18)%>"></td>
</tr>
<tr> 
<td class="tablerow2"Highlight><U>文件名前缀</U><br>0表示不添加前缀</td>
<td class="tablerow2"Highlight>
<input type=text name="Setting19" value="<%=ClsPub.TW_Config(19)%>"></td>
</tr>
<tr> 
<td class="tablerow2"Highlight><U>文件目录创建方式</U><br>方式一:0:年-月-日 1:年-月 2:年-月-日-小时<br>方式二:使用[Y][M][D][H]自由组合,上下级目录分别用"-"隔开.
如:[Y][M]-[D] 表示:年月-日这样的目录.
</td>
<td class="tablerow2"Highlight>
<input type=text name="Setting20" value="<%=ClsPub.TW_Config(20)%>"></td>
</tr>
<tr> 
<td class="tablerow2"Highlight><U>定义文件随机数位数</U><br>建议至少5位数以上.</td>
<td class="tablerow2"Highlight>

<input type=text name="Setting21" value="<%=ClsPub.TW_Config(21)%>"></td>
</tr>
<tr> 
<td class="tablerow2"Highlight><U>定义提取文件的ID随机数位数</U><br>建议至少5位数以上.</td>
<td class="tablerow2"Highlight>

<input type=text name="Setting22" value="<%=ClsPub.TW_Config(22)%>"></td>
</tr>
<tr> 
<td class="tablerow2"Highlight><U>文件保存路径</U></td>
<td class="tablerow2"Highlight>

<input type=text name="Setting23" value="<%=ClsPub.TW_Config(23)%>"></td>
</tr>

<tr> 
<td class="tablerow2"Highlight><U>预览图保存路径</U></td>
<td class="tablerow2"Highlight>

<input type=text name="Setting24" value="<%=ClsPub.TW_Config(24)%>"></td>
</tr>

<tr style="display:none;"> 
	<td class="tablerow2"><U>图片水印设置开关:</U></td>
	<td class="tablerow2"> 
		<SELECT name="Setting25" id="Setting25">
		<OPTION value="0" <%If Clng(ClsPub.TW_Config(25))=0 Then Response.Write "Selected"%>>关闭水印效果</OPTION>
		<OPTION value="1" <%If Clng(ClsPub.TW_Config(25))=1 Then Response.Write "Selected"%>>水印文字效果</OPTION>
		<OPTION value="2" <%If Clng(ClsPub.TW_Config(25))=2 Then Response.Write "Selected"%>>水印图片效果</OPTION>
		</SELECT>
	</td>
</tr>
<tr style="display:none;"> 	<td class="tablerow2"><U>生成预览图片大小设置(宽度|高度):</U></td>
	<td class="tablerow2">
		宽度:<INPUT TYPE="text" NAME="Setting26" size=10 value="<%=ClsPub.TW_Config(26)%>"> 象素
		高度:<INPUT TYPE="text" NAME="Setting27" size=10 value="<%=ClsPub.TW_Config(27)%>"> 象素
	</td>
</tr>
<tr style="display:none;"> <td class="tablerow2"Highlight><U>生成预览图片大小规则选项:</U></td>
	<td class="tablerow2"Highlight> 
		<SELECT name="Setting28" id="Setting28">
		<OPTION value=0 <%If Clng(ClsPub.TW_Config(28))=0 Then Response.Write "Selected"%>>固定</OPTION>
		<OPTION value=1 <%If Clng(ClsPub.TW_Config(28))=1 Then Response.Write "Selected"%>>等比例缩小</OPTION>
		</SELECT>
	</td>
</tr>

<tr style="display:none;"> <td class="tablerow2"Highlight><U>上传图片添加水印文字信息(可为空或0):</U></td>
	<td class="tablerow2"Highlight> 
	<INPUT TYPE="text" NAME="Setting29" size=40 value="<%=ClsPub.TW_Config(29)%>">
	</td>
</tr>
<tr style="display:none;"> <td class="tablerow2"><U>上传添加水印字体大小:</U></td>
	<td class="tablerow2"> 
	<INPUT TYPE="text" NAME="Setting30" size=10 value="<%=ClsPub.TW_Config(30)%>"> <b>px</b>
	</td>
</tr>
<tr style="display:none;"> <td class="tablerow2"Highlight><U>上传添加水印字体颜色:</U></td>
	<td class="tablerow2"Highlight>
	<input type="hidden" name="Setting31" id="Setting31" value="<%=ClsPub.TW_Config(31)%>">
	<img border=0 src="Images/rect.gif" style="cursor:pointer;background-Color:<%=ClsPub.TW_Config(31)%>;" onClick="Getcolor(this,'Setting31');" title="选取颜色!">
	</td>
</tr>
<tr style="display:none;"> <td class="tablerow2"><U>上传添加水印字体名称:</U></td>
	<td class="tablerow2">
	<SELECT name="Setting32" id="Setting32">
	<option value="宋体" <%If ClsPub.TW_Config(32)="宋体" Then Response.Write "Selected"%>>宋体</option>
	<option value="楷体_GB2312" <%If ClsPub.TW_Config(32)="楷体_GB2312" Then Response.Write "Selected"%>>楷体</option>
	<option value="新宋体" <%If ClsPub.TW_Config(32)="新宋体" Then Response.Write "Selected"%>>新宋体</option>
	<option value="黑体" <%If ClsPub.TW_Config(32)="黑体" Then Response.Write "Selected"%>>黑体</option>
	<option value="隶书" <%If ClsPub.TW_Config(32)="隶书" Then Response.Write "Selected"%>>隶书</option>
	<OPTION value="Andale Mono" <%If ClsPub.TW_Config(32)="Andale Mono" Then Response.Write "Selected"%>>Andale Mono</OPTION> 
	<OPTION value="Arial" <%If ClsPub.TW_Config(32)="Arial" Then Response.Write "Selected"%>>Arial</OPTION> 
	<OPTION value="Arial Black" <%If ClsPub.TW_Config(32)="Arial Black" Then Response.Write "Selected"%>>Arial Black</OPTION> 
	<OPTION value="Book Antiqua" <%If ClsPub.TW_Config(32)="Book Antiqua" Then Response.Write "Selected"%>>Book Antiqua</OPTION>
	<OPTION value="Century Gothic" <%If ClsPub.TW_Config(32)="Century Gothic" Then Response.Write "Selected"%>>Century Gothic</OPTION> 
	<OPTION value="Comic Sans MS" <%If ClsPub.TW_Config(32)="Comic Sans MS" Then Response.Write "Selected"%>>Comic Sans MS</OPTION>
	<OPTION value="Courier New" <%If ClsPub.TW_Config(32)="Courier New" Then Response.Write "Selected"%>>Courier New</OPTION>

⌨️ 快捷键说明

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