📄 sysconfig.asp
字号:
<option value="0" <%if jjscsh=0 then Response.write("selected")%>>需要审核</option>
</select></td>
</tr><tr class="tdbg">
<td height="21" align="right">装饰图片审核方式：</td>
<td height="21"> <select class="face" size="1" name="zssh">
<option value="1" <%if zssh=1 then Response.write("selected")%>>直接发布,无需审核</option>
<option value="0" <%if zssh=0 then Response.write("selected")%>>需要审核</option>
</select></td>
</tr><tr class="tdbg">
<td height="21" align="right">人才招聘审核方式：</td>
<td height="21"> <select class="face" size="1" name="Jobsh">
<option value="1" <%if Jobsh=1 then Response.write("selected")%>>直接发布,无需审核</option>
<option value="0" <%if Jobsh=0 then Response.write("selected")%>>需要审核</option>
</select></td>
</tr><tr class="tdbg">
<td height="21" align="right">个人求职审核方式：</td>
<td height="21"> <select class="face" size="1" name="qzsh">
<option value="1" <%if qzsh=1 then Response.write("selected")%>>直接发布,无需审核</option>
<option value="0" <%if qzsh=0 then Response.write("selected")%>>需要审核</option>
</select></td>
</tr><tr class="tdbg">
<td height="21" align="right">黄页信息审核方式：</td>
<td height="21"> <select class="face" size="1" name="hysh">
<option value="1" <%if hysh=1 then Response.write("selected")%>>直接发布,无需审核</option>
<option value="0" <%if hysh=0 then Response.write("selected")%>>需要审核</option>
</select></td>
</tr>
<tr class="title">
<td height="22" class="bottom" align="right" colspan="2">
<p align="center">上传文件设置</td>
</tr>
<tr class="tdbg">
<td height="19" align="right">选取上传组件：</td>
<td height="19"> <select name="upload1" onChange="chkselect(options[selectedIndex].value,'know2');">
<option value="999" <%if upload1=999 then Response.write("selected")%>>完全关闭上传功能
<option value="0" <%if upload1=0 then Response.write("selected")%>>无组件上传类
<option value="1" <%if upload1=1 then Response.write("selected")%>>Aspupload3.0组件
<option value="2" <%if upload1=2 then Response.write("selected")%>>SA-FileUp 4.0组件
<option value="3" <%if upload1=3 then Response.write("selected")%>>DvFile-Up V1.0组件
</option></select><div id="know2"></div></td>
</tr>
<tr class="tdbg">
<td height="20" align="right"><strong style="font-weight: 400">允许上传用户等级:</strong></td>
<td height="20"> <select name="upload18">
<option value="0" <%if upload18=0 then Response.write("selected")%>>游客</option>
<option value="1" <%if upload18=1 then Response.write("selected")%>>普通会员</option>
<option value="2" <%if upload18=2 then Response.write("selected")%>>高级会员</option></select></td>
</tr>
<tr class="tdbg">
<td height="11" align="right">信息图片上传目录：</td>
<td height="3"> <input type=text name="upload0" value="<%=upload0%>" class="face">
<font color="blue">目录相对于上传总目录“/Upload/”</td>
</tr>
<tr class="tdbg">
<td height="20" align="right">图片目录分类：</td>
<td height="20"> <select name="upload19">
<option value="0" <%if upload19=0 then Response.write("selected")%>>不使用</option>
<option value="1" <%if upload19=1 then Response.write("selected")%>>年</option>
<option value="2" <%if upload19=2 then Response.write("selected")%>>年-月</option>
<option value="3" <%if upload19=3 then Response.write("selected")%>>年-月-日</option>
</select></td>
</tr>
<tr class="tdbg">
<td align="right"><strong style="font-weight: 400">允许上传图片类型： </strong></td>
<td> <input name="upload20" type="text" size="35" value="<%=upload20%>"> 限制：<input name="upload21" type="text" value="<%=upload21%>" size="7" maxlength="6"> K 重命名：<input name="upload22" type="checkbox" value="1" <%if upload22="1" then%>checked<%end if%>><br><font color="blue"> 即允许上传的文件扩展名，用“|”分隔。</td>
</tr>
<tr class="tdbg">
<td align="right"><strong style="font-weight: 400">允许上传Flash类型：</strong></td>
<td> <input name="upload23" type="text" size="35" value="<%=upload23%>"> 限制：<input name="upload24" type="text" value="<%=upload24%>" size="7" maxlength="6"> K 重命名：<input name="upload25" type="checkbox" value="1" <%if upload25="1" then%>checked<%end if%>><br><font color="blue"> 即允许上传的文件扩展名，用“|”分隔。</td>
</tr>
<tr class="tdbg">
<td align="right"><strong style="font-weight: 400">允许上传媒体类型：</strong></td>
<td> <input name="upload26" type="text" size="35" value="<%=upload26%>"> 限制：<input name="upload27" type="text" value="<%=upload27%>" size="7" maxlength="6"> K 重命名：<input name="upload28" type="checkbox" value="1" <%if upload28="1" then%>checked<%end if%>><br><font color="blue"> 即允许上传的文件扩展名，用“|”分隔。</td>
</tr>
<tr class="tdbg">
<td align="right"><strong style="font-weight: 400">允许上传文件类型：</strong></td>
<td> <input name="upload29" type="text" size="35" value="<%=upload29%>"> 限制：<input name="upload30" type="text" value="<%=upload30%>" size="7" maxlength="6"> K 重命名：<input name="upload31" type="checkbox" value="1" <%if upload31="1" then%>checked<%end if%>><br><font color="blue"> 即允许上传的文件扩展名，用“|”分隔。</td>
</tr>
<tr class="tdbg">
<td height="19" align="right">选取生成水印图片组件：</td>
<td height="19"> <select name="upload2" onChange="chkselect(options[selectedIndex].value,'know3');">
<option value="999" <%if upload2=999 then Response.write("selected")%>>关闭
<option value="0" <%if upload2=0 then Response.write("selected")%>>CreatePreviewImage组件
<option value="1" <%if upload2=1 then Response.write("selected")%>>AspJpeg组件
<option value="2" <%if upload2=2 then Response.write("selected")%>>SA-ImgWriter组件
</select><div id="know3"></div></td>
</tr>
<tr class="tdbg">
<td height="22" align="right">图片水印设置开关：</td>
<td height="8"> <SELECT name="upload3">
<OPTION value="0" <%if upload3=0 then Response.write("selected")%>>关闭水印效果</OPTION>
<OPTION value="1" <%if upload3=1 then Response.write("selected")%>>水印文字效果</OPTION>
<OPTION value="2" <%if upload3=2 then Response.write("selected")%>>水印图片效果</OPTION>
</SELECT></td>
</tr>
<tr class="tdbg">
<td height="22" align="right">上传图片水印文字信息：</td>
<td height="4"> <INPUT TYPE="text" name="upload4" class="face" size=40 value="<%=upload4%>"></td>
</tr>
<tr class="tdbg">
<td height="22" align="right">上传添加水印字体大小：</td>
<td height="5"> <INPUT TYPE="text" name="upload5" size=10 value="<%=upload5%>" class="face"> <b>px</b>
</td>
</tr>
<tr class="tdbg">
<td height="22" align="right">上传添加水印字体颜色： </td>
<td height="5"> <input type="text" name="upload6" size=10 value="<%=upload6%>" class="face">
<img border=0 src="images/Gcolor.gif" style="cursor:pointer;background-Color:<%=upload6%>;" onClick="Getcolor(this,'upload6');" title="选取颜色!" align="absmiddle">
</td>
</tr>
<tr class="tdbg">
<td height="22" align="right">上传添加水印字体名称： </td>
<td height="7"> <SELECT name="upload7">
<option value="宋体" <%if upload7="宋体" then Response.write("selected")%>>宋体</option>
<option value="楷体_GB2312" <%if upload7="楷体_GB2312" then Response.write("selected")%>>楷体</option>
<option value="新宋体" <%if upload7="新宋体" then Response.write("selected")%>>新宋体</option>
<option value="黑体" <%if upload7="黑体" then Response.write("selected")%>>黑体</option>
<option value="隶书" <%if upload7="隶书" then Response.write("selected")%>>隶书</option>
<OPTION value="Andale Mono" <%if upload7="Andale Mono" then Response.write("selected")%>>Andale Mono</OPTION>
<OPTION value="Arial" <%if upload7="Arial" then Response.write("selected")%>>Arial</OPTION>
<OPTION value="Arial Black" <%if upload7="Arial Black" then Response.write("selected")%>>Arial Black</OPTION>
<OPTION value="Book Antiqua" <%if upload7="Book Antiqua" then Response.write("selected")%>>Book Antiqua</OPTION>
<OPTION value="Century Gothic" <%if upload7="Century Gothic" then Response.write("selected")%>>Century Gothic</OPTION>
<OPTION value="Comic Sans MS" <%if upload7="Comic Sans MS" then Response.write("selected")%>>Comic Sans MS</OPTION>
<OPTION value="Courier New" <%if upload7="Courier New" then Response.write("selected")%>>Courier New</OPTION>
<OPTION value="Georgia" <%if upload7="Georgia" then Response.write("selected")%>>Georgia</OPTION>
<OPTION value="Impact" <%if upload7="Impact" then Response.write("selected")%>>Impact</OPTION>
<OPTION value="Tahoma" <%if upload7="Tahoma" then Response.write("selected")%>>Tahoma</OPTION>
<OPTION value="Times New Roman" <%if upload7="Times New Roman" then Response.write("selected")%>>Times New Roman</OPTION>
<OPTION value="Trebuchet MS" <%if upload7="Trebuchet MS" then Response.write("selected")%>>Trebuchet MS</OPTION>
<OPTION value="Script MT Bold" <%if upload7="Script MT Bold" then Response.write("selected")%>>Script MT Bold</OPTION>
<OPTION value="Stencil" <%if upload7="Stencil" then Response.write("selected")%>>Stencil</OPTION>
<OPTION value="Verdana" <%if upload7="Verdana" then Response.write("selected")%>>Verdana</OPTION>
<OPTION value="Lucida Console" <%if upload7="Lucida Console" then Response.write("selected")%>>Lucida Console</OPTION>
</SELECT></td>
</tr>
<tr class="tdbg">
<td height="22" align="right">上传水印字体是否粗体：</td>
<td height="7"> <SELECT name="upload8">
<OPTION value=0 <%if upload8=0 then Response.write("selected")%>>否</OPTION>
<OPTION value=1 <%if upload8=1 then Response.write("selected")%>>是</OPTION>
</SELECT></td>
</tr>
<tr class="tdbg">
<td height="22" align="right">添加水印LOGO图片信息：</td>
<td height="7"> <INPUT TYPE="text" name="upload9" size=40 value="<%=upload9%>" class="face"></td>
</tr>
<tr class="tdbg">
<td height="22" align="right">添加水印透明度：</td>
<td height="7"> <INPUT TYPE="text" name="upload10" size=10 value="<%=upload10%>" class="face"> 如60%请填写0.6</td>
</tr>
<tr class="tdbg">
<td height="22" align="right">水印图片去除底色：</td>
<td height="7"> <INPUT TYPE="text" name="upload11" size=10 value="<%=upload11%>" class="face">
<img border=0 src="images/Gcolor.gif" style="cursor:pointer;background-Color:<%=upload11%>;" onClick="Getcolor(this,'upload11');" title="选取颜色!" align="absmiddle">
保留为空则水印图片不去除底色。</td>
</tr>
<tr class="tdbg">
<td height="22" align="right">文字或图片的长宽：</td>
<td height="7">宽：<INPUT TYPE="text" name="upload12" size=10 value="<%=upload12%>" class="face"> 象素
高：<INPUT TYPE="text" name="upload13" size=10 value="<%=upload13%>" class="face"> 象素
：如水印图片的宽度和高度。</td>
</tr>
<tr class="tdbg">
<td height="22" align="right">添加水印LOGO位置坐标：</td>
<td height="7"> <SELECT name="upload14">
<option value="0" <%if upload14=0 then Response.write("selected")%>>左上</option>
<option value="1" <%if upload14=1 then Response.write("selected")%>>左下</option>
<option value="2" <%if upload14=2 then Response.write("selected")%>>居中</option>
<option value="3" <%if upload14=3 then Response.write("selected")%>>右上</option>
<option value="4" <%if upload14=4 then Response.write("selected")%>>右下</option>
</SELECT></td>
</tr>
<tr class="tdbg">
<td height="22" align="right">生成预览图片大小：</td>
<td height="7">宽：<INPUT TYPE="text" name="upload15" size=10 value="<%=upload15%>" class="face"> 象素
高：<INPUT TYPE="text" name="upload16" size=10 value="<%=upload16%>" class="face"> 象素</td>
</tr>
<tr class="tdbg">
<td height="11" align="right">生成预览图片规则选项：</td>
<td height="4"> <SELECT name="upload17">
<OPTION value=0 <%if upload17=0 then Response.write("selected")%>>固定</OPTION>
<OPTION value=1 <%if upload17=1 then Response.write("selected")%>>等比例缩小</OPTION>
</SELECT></td>
</tr>
<tr class="title">
<td height="21" class="bottom" align="right" colspan="2">
<p align="center"><span lang="zh-cn">邮件发送设置</span></td>
</tr>
<tr>
<td width="25%" height="25" align=right bgcolor="#DEF0FA"><strong>邮件发送组件：</strong></td>
<td height="25" bgcolor="#DEF0FA">
<select name="mailser" id="mailser" onChange="chkselect(options[selectedIndex].value,'know1');">
<option value="0" <%if mailser="0" then Response.write("selected")%>>不支持
<option value="1" <%if mailser="1" then Response.write("selected")%>>JMAIL
<option value="2" <%if mailser="2" then Response.write("selected")%>>CDONTS
<option value="3" <%if mailser="3" then Response.write("selected")%>>ASPEMAIL
</select> <font color=#3370CC>请一定要选择服务器上已安装的组件</font><div id=know1></div>
</td>
</tr>
<tr class="tdbg">
<td height="21" align="right">Smtp服务器：</td>
<td height="21"> <input type="text" name="smtphost" value="<%=mailsmtp%>" size="20" class="face"></td>
</tr>
<tr class="tdbg">
<td height="21" align="right">邮箱用户名：</td>
<td height="21"> <input type="text" name="mail" value="<%=mailname%>" size="20" class="face"></td>
</tr>
<tr class="tdbg">
<td height="21" align="right">邮箱密码：</td>
<td height="21"> <input name="pass" value="<%=mailpass%>" size="20" type="password" class="face"></td>
</tr>
<tr class="tdbg">
<td height="21" align="right">发信人邮箱：</td>
<td height="21"> <input type="text" name="replyaddress" value="<%=mailform%>" size="20" class="face"></td>
</tr>
<tr class="title">
<td height="21" class="bottom" align="right" colspan="2">
<p align="center">信息过滤</td>
</tr> <tr class="tdbg">
<td height="21" align="right"> </td>
<td height="21"><b>说明</b>：过滤字符设定规则为 <b>要过滤的字符=过滤后的字符</b>
，每个过滤字符用回车分割开。</td>
</tr>
<tr class="tdbg">
<td height="21" align="right"> </td>
<td height="21"> <textarea id="badwords" name="badwords" rows="14" cols="66"><%
Response.Write replace(badwords,"|",vbCrlf)
%></textarea> </td>
</tr>
<tr class="tdbg">
<td height="22" align="right"></td>
<td height="22"> <input type="submit" value="更 新" name="submit" class="button" <%If IsObjInstalled(InstalledObjects(9))=false Then response.Write "disabled"%>> <input type="reset" value="取 消" name="reset" class="button"></td>
</tr>
<tr class="tdbg">
<td height="19" align="right" colspan="2">
<p align="center"><%If IsObjInstalled(InstalledObjects(9))=false then%><a target="_blank" href="http://www.fyasp.com/Html/Article/fwq/352.html"><font color="#FF0000">提醒：您的服务器不支持FSO，如果是自己的服务器，请点击查看开通FSO的方法！<%end if%></font></a></td>
</tr>
</form>
</table>
<%
end Select
'======================================
'saveconfig参数设置
'======================================
sub saveconfig
sfso=IsObjInstalled("Scripti"&"ng.File"&"SystemO"&"bject")
fcml1=changechr(Request.form("fcml"))
homepage_link1=changechr(Request.form("homepage_link"))
homepage_title1 =changechr(Request.form("homepage_title"))
your_email1 =changechr(Request.form("your_email"))
sh1 =trim(Request.form("sh"))
maildom1=trim(Request.form("maildom"))
fyt21=trim(Request.form("fyt2"))
dim smtphost,mail,pass,replyaddress,fs,fobj,nPath
if Instr(request("smtphost"),"=")>0 or Instr(request("smtphost"),"%")>0 or Instr(request("smtphost"),chr(32))>0 or Instr(request("smtphost"),"?")>0 or Instr(request("smtphost"),"&")>0 or Instr(request("smtphost"),";")>0 or Instr(request("smtphost"),",")>0 or Instr(request("smtphost"),"'")>0 or Instr(request("smtphost"),",")>0 or Instr(request("smtphost"),chr(34))>0 or Instr(request("smtphost"),chr(9))>0 or Instr(request("smtphost"),"⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -