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

📄 option.asp

📁 院校使用的一套心理在线咨询系统(免验证细节美化版) v2.6
💻 ASP
字号:
🔍 
<%@language=vbscript codepage=936 %>
<!--#INCLUDE FILE="config.asp"-->
<!--#INCLUDE FILE="background.asp"-->
<%if session("admin")<>1 then response.Redirect "default.asp"%>
<%
if request.Form("submit")="审核通过全部留言" then
	dsql="update reply set mark=1"
	conn.execute(dsql)
	dsql="update guest set mark=1"
	conn.execute(dsql)	
	%>
	<script>alert("已全部设置成已审核！")</script>
	<%
end if
if request.Form("submit")=" 提 交 " then
register="1"
adminreply=request.Form("adminreply")
show=request.Form("show")
modal="1"
row1="15"
row2="15"
second1="20"
count1=request.Form("count")
killword=request.Form("killword")
stopword=request.Form("stopword")
killIP=request.Form("killIP")
background=""
bannerImg=request.Form("bannerImg")
bannerImgLink=""
lytitle="宁波职业技术学院-=-心理咨询平台"
webname=request.Form("webname")
weblink=request.Form("weblink")
muieditor=request.Form("muieditor")
regshow=request.Form("regshow")
lylength="0"
lygg=request.Form("lygg")
skin=request.Form("skin1")
showmail="1"
faceupload="0"
showcode="1"
passuser=request.Form("passuser")
uploadsize=request.Form("uploadsize")
uploadtype=request.Form("uploadtype")
if killip="" then killip=","
if passuser="" then passuser=","
if right(passuser,1)<>"," then passuser=passuser&","
if left(passuser,1)<>"," then passuser=","&passuser
if background="" then background=" "
if bannerImg="" then bannerImg=" "
if bannerImgLink="" then bannerImgLink=" "
if lytitle="" then lytitle=" "
if webname="" then webname=" "
if weblink="" then weblink=" "
if lygg="" then lygg=" "
		rs11("register")=register
		rs11("adminreply")=adminreply
		rs11("show")=show
		rs11("modal")=modal
	    rs11("row1")=row1
		rs11("row2")=row2
		rs11("second1")=second1
		rs11("count")=count1
		rs11("killword")=killword
		rs11("stopword")=stopword
		rs11("killIP")=killIP
		rs11("background")=background
		rs11("bannerImg")=bannerImg
		rs11("bannerImgLink")=bannerImgLink
		rs11("lytitle")=lytitle
		rs11("webname")=webname
		rs11("weblink")=weblink	
		rs11("muieditor")=muieditor
		rs11("regshow")=regshow	
		rs11("lylength")=lylength
		rs11("lygg")=lygg
		rs11("skin")=skin
		rs11("showmail")=showmail
		rs11("faceupload")=faceupload
		rs11("showcode")=showcode
		rs11("passuser")=passuser
		rs11("uploadsize")=uploadsize
		rs11("uploadtype")=uploadtype
    	rs11.update
     response.Redirect "post_ok.asp?info=留言板设置成功！"
conn.close
set conn=nothing
end if
%>	
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>功能选项</title>
<link href="1.css" rel="stylesheet" type="text/css">
</head>

<body>

<form action="" method="POST" name="form" id="form" >
<table width="100%" align="center" cellpadding="5" cellspacing="1" class="tablebg<%=skin%>b" height="373">
    <tr class="tablebg<%=skin%>d">
      <td width="57%" align="center"><div align="left"><strong>是否只有管理员或版主可以回复：</strong></div></td>
      <td height="28" align="center" width="41%"><div align="left"><font color="#FFFFFF">
        <input name="adminreply" type="radio" value="1" <%if rs11("adminreply") then%>checked<%end if%>>
</font>是 <font color="#FFFFFF">
<input type="radio" name="adminreply" value="0" <%if not rs11("adminreply") then%>checked<%end if%>>
</font>否<font color="#FFFFFF">      </font></div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td width="57%" align="center"><div align="left"><strong>是否需要经过审核才能显示留言：</strong></div></td>
      <td height="28" align="center" width="41%"><div align="left"><font color="#FFFFFF">
        <input name="show" type="radio" value="1" <%if rs11("show") then%>checked<%end if%>>
</font>是 <font color="#FFFFFF">
<input type="radio" name="show" value="0" <%if not rs11("show") then%>checked<%end if%>>
</font>否<font color="#FFFFFF"> 
<input type="submit" class="input2" name="Submit" value="审核通过全部留言">
</font></div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td width="57%" align="center"><div align="left"><strong>被过滤词语后自动禁止其留言：</strong></div></td>
      <td height="28" align="center" width="41%"><div align="left"><font color="#FFFFFF">
        <input name="stopword" type="radio" value="1" <%if rs11("stopword") then%>checked<%end if%>>
</font>是 <font color="#FFFFFF">
<input type="radio" name="stopword" value="0" <%if not rs11("stopword") then%>checked<%end if%>>
</font>否<font color="#FFFFFF">      </font></div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td align="center"><div align="left"><strong>未注册用户是否允许查看留言内容：</strong></div></td>
      <td height="28" align="center" width="41%"><div align="left"><font color="#FFFFFF">
          <input name="regshow" type="radio" value="1" <%if rs11("regshow") then%>checked<%end if%>>
        </font>是 <font color="#FFFFFF">
        <input type="radio" name="regshow" value="0" <%if not rs11("regshow") then%>checked<%end if%>>
      </font>否<font color="#FFFFFF"> </font></div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td align="center"><div align="left"><strong>留言板默认配色方案：</strong></div></td>
      <td height="28" align="center" width="41%"><div align="left">
        <select name="skin1" id="skin1">
          <option value="1" selected>蓝天白云</option>
          <option value="2" <%if rs11("skin")=2 then response.write("selected")%>>水晶紫色</option>
		  <option value="3" <%if rs11("skin")=3 then response.write("selected")%>>秋意盎然</option>
		  <option value="4" <%if rs11("skin")=4 then response.write("selected")%>>绿野仙踪</option>
		  <option value="5" <%if rs11("skin")=5 then response.write("selected")%>>浓浓绿意</option>
		  <option value="6" <%if rs11("skin")=6 then response.write("selected")%>>橘子红了</option>
        </select>
      </div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td width="57%" align="center"><div align="left"><strong>自动过滤词语(用半角逗号,分隔)：</strong></div></td>
      <td height="26" align="center" width="41%"><div align="left"><font color="#00FF00">
        <input name="killword" type="text" class="input1" id="killword2" value="<%=rs11("killword")%>" size="30" maxlength="255" >
      </font></div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td width="57%" align="center"><div align="left"><strong>禁止指定IP留言(用半角逗号,分隔)：</strong></div></td>
      <td height="26" align="center" width="41%"><div align="left"><font color="#00FF00">
        <input name="killip" type="text" class="input1" id="killip" value="<%=rs11("killIP")%>" size="30" maxlength="255" >
      </font></div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td width="57%" align="center"><div align="left"><strong>留言板计数器值：</strong></div></td>
      <td height="26" align="center" width="41%"><div align="left"><font color="#00FF00">
        <input name="count" type="text" class="input1" id="count2" value="<%=rs11("count")%>" size="30" >
      </font></div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td width="57%" align="center"><div align="left"><strong>页面上方横幅图片路径：</strong></div></td>
      <td height="26" align="center" width="41%"><div align="left"><font color="#00FF00">
        <input name="bannerImg" type="text" class="input1" id="bannerImg2" value="<%=rs11("bannerImg")%>" size="30" >
      </font></div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td align="center"><div align="left"><strong>留言首页公告信息：</strong></div></td>
      <td height="26" align="center" width="41%"><div align="left"><font color="#00FF00">
        <input name="lygg" type="text" class="input1" id="weblink2" value="<%=rs11("lygg")%>" size="30" >
      </font></div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td align="center"><div align="left" style="font-weight: bold">编辑器使用方案：</div>
        </td>
      <td height="28" align="center" width="41%"><div align="left"><font color="#00FF00">
        </font><font color="#FFFFFF">
      </font><font color="#FFFFFF">
      </font><font color="#FFFFFF"> 
      <select name="muieditor" id="muieditor">
        <option value="1" <%if rs11("muieditor")=1 then response.write("selected")%>>多功能文本编辑器</option>
        <option value="2" <%if rs11("muieditor")=2 then response.write("selected")%>>UBB标签编辑器</option>
        <option value="0" <%if rs11("muieditor")=0 then response.write("selected")%>>不使用编辑器</option>
      </select>
      </font><font color="#00FF00">        </font></div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td align="center"><div align="left"><span style="font-weight: bold">审核状态时无需审核的用户<strong>(用半角逗号,分隔)</strong>：</span></div></td>
      <td height="26" align="center" width="41%"><div align="left">
        <font color="#00FF00">
        <input name="passuser" type="text" class="input1" id="weblink3" value="<%=rs11("passuser")%>" size="30"></font>
      </div></td>
    </tr>
    <tr class="tablebg<%=skin%>d">
      <td height="26" colspan="2" align="center"><input name="Submit" type="submit" class="input2" id="join3" value=" 提 交 " >
　
  <input name="B12" type="reset" class="input2" id="B123"  value=" 重 写 "  >
</td>
    </tr>
  </table>
  <table border=0 width=100% align=center>
    <tr> 
      <td height=12><HR SIZE=1 WIDTH=100% NOSHADE COLOR=#C0C0C0></td>
    </tr>
    <tr> 
      <td align=center> 
        <!--#INCLUDE FILE="bottom.asp"-->
    </tr>
  </table>
</form>
</body>
</html>

⌨️ 快捷键说明

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