📄 aa_const.asp

📁 强大的后台管理功能,给用户自由制定页面,新闻、产品多级分类。管理员后台站点关闭,后台管理员仍然可以登陆。页面是否允许使用右键和复制功能。自定义IE状态栏、版权等显示信息。开通会员注册和产品
💻 ASP
📖 第 1 页 / 共 3 页
字号:
12 3 下一页
<%@ LANGUAGE = VBScript CodePage = 936%>
<%
PageName="Admin,0"
%>
<!--#include file="Inc/Const.asp"-->
<!--#include file="Inc/Sysconn.asp"-->

<%
Call Page_formBody()
Call Page_Spane(5)
dim Web_Login2,Web_Guest3,Web_Bbs3,Web_Cret5
Page_HeadName="<A HREF=Aa_Const.asp?Action=Const#1>基本设置</A>　|　<A HREF=Aa_Const.asp?Action=Const#2>用户注册设置</A>　|　<A HREF=Aa_Const.asp?Action=Const#3>用户登陆设置</A>　|　<A HREF=Aa_Const.asp?Action=Const#4>产品相关设置</A>　|　<A HREF=Aa_Const.asp?Action=Const#5>留言设置</A>　|　<A HREF=Aa_Const.asp?Action=Const#6>论坛设置</A>　|　<A HREF=Aa_Const.asp?Action=Const#7>评论设置</A>　|　<A HREF=Aa_Const.asp?Action=Const#8>统计设置</A>"
Select Case Action
Case "Const"
Call Page_AdminFlag(1)
Page_BootmName="基本参数设置"
Page_BootName="您现在的位置：<A HREF=A_Right.asp>管理首页</A> >> " & Page_BootmName
Web_Guest3=Replace(Web_Const(30),",",CHR(10))
Web_Bbs3=Replace(Web_Const(79),",",CHR(10))
Web_Cret5=Replace(Web_Const(91),",",CHR(10))
strIfa = "<TABLE WIDTH=100%  BORDER=0 CELLPADDING=0 CELLSPACING=1>"&_
         "<Form NAME=Save method=post action=Aa_Const.asp?Action=ConstEdit>"&_
		          "<TR ALIGN=center>"&_
		          "<TD HEIGHT=35 colspan=2 CLASS=Table6><a NAME=1></A>基本设置</TD>"&_
		          "</TR>"&_
         "<TR>"&_
         "<TD WIDTH=20% HEIGHT=30 CLASS=Table8>站点状态：</TD>"&_
         "<TD CLASS=Table8><INPUT TYPE=radio CLASS='radio_all' NAME=Const_6 VALUE='1'"
		 IF Web_Const(6)=1 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & "> 打开　<INPUT TYPE=radio CLASS='radio_all' NAME=Const_6 VALUE='0'"
		 IF Web_Const(6)=0 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & ">关闭　　站点关闭之后,后台管理员仍然可以登陆</TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=90 CLASS=Table8>关闭原因：</TD>"&_
		          "<TD CLASS=Table8><TEXTAREA NAME=Const_7 cols=44 rows=5 id=Const_7>" & Web_Const(7) & "</TEXTAREA>　　HTML支持</TD>"&_
		          "</TR>"&_
         "<TR>"&_
         "<TD WIDTH=20% HEIGHT=30 CLASS=Table8>页面是否允许使用右键：</TD>"&_
         "<TD CLASS=Table8><INPUT TYPE=radio CLASS='radio_all' NAME=Const_16 VALUE='0'"
		 IF Web_Const(16)=0 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & "> 允许　<INPUT TYPE=radio CLASS='radio_all' NAME=Const_16 VALUE='1'"
		 IF Web_Const(16)=1 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & ">禁用　　此项禁用后，用户在浏览页面时无法使用右键</TD>"&_
		          "</TR>"&_
         "<TR>"&_
         "<TD WIDTH=20% HEIGHT=30 CLASS=Table8>页面内容是否允许复制：</TD>"&_
         "<TD CLASS=Table8><INPUT TYPE=radio CLASS='radio_all' NAME=Const_17 VALUE='0'"
		 IF Web_Const(17)=0 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & "> 允许　<INPUT TYPE=radio CLASS='radio_all' NAME=Const_17 VALUE='1'"
		 IF Web_Const(17)=1 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & ">禁用　　此项禁用后，用户无法复制页面的内容</TD>"&_
		          "</TR>"&_
				  "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>CSS文件地址：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Const_5 TYPE=text VALUE='" & Web_Const(5) & "' id=Const_5 size=35></TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>管理登陆有效时间：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Const_10 TYPE=text VALUE='" & Web_Const(10) & "' id=Const_10 size=15 onkeypress='event.returnValue=IsDigit();'></TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>网站创建时间：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Const_9 TYPE=text VALUE='" & Web_Const(9) & "' id=Const_9 size=35>　　格式为：年-月-日 时:分:秒</TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>网站（单位）名称：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Const_0 TYPE=text VALUE='" & Web_Const(0) & "' id=Const_0 size=35></TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>网站地址：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Const_1 TYPE=text VALUE='" & Web_Const(1) & "' id=Const_1 size=35>　　请输入完整的格式，如：<A HREF='http://www.csys.com.cn'>http://www.csys.com.cn</A></TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>LOGO地址：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Const_2 TYPE=text VALUE='" & Web_Const(2) & "' id=Const_2 size=35>　　只能是图片，格式为：PNG、GIF、JPG、BMP</TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>BAN地址：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Const_3 TYPE=text VALUE='" & Web_Const(3) & "' id=Const_3 size=35>　　<INPUT CLASS=radio_all NAME=Const_4 TYPE=radio VALUE=1"
		 IF Web_Const(4)=1 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & "> FLASH　<INPUT TYPE=radio CLASS='radio_all' NAME=Const_4 VALUE='0'"
		 IF Web_Const(4)=0 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & ">图片</TD>"&_
		          "</TR>"&_
         "<TR>"&_
         "<TD HEIGHT=30 CLASS=Table8>BANNER大小：</TD>"&_
         "<TD CLASS=Table8>宽度：<INPUT NAME=Const_11 TYPE=text VALUE='" & Web_Const(11) & "' id=Const_11 size=10 onkeypress='event.returnValue=IsDigit();'>　　高度：<INPUT NAME=Const_12 TYPE=text VALUE='" & Web_Const(12) & "' id=Const_12 size=10 onkeypress='event.returnValue=IsDigit();'></TD>"&_
         "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>BANNER链接地址：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Const_13 TYPE=text VALUE='" & Web_Const(13) & "' id=Const_13 size=45>　　如果BANNER是FLASH，此处设置无效</TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>联系地址：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Ltd_0 TYPE=text VALUE='" & Web_Const(19) & "' id=Ltd_0 size=45></TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>邮政编码：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Ltd_1 TYPE=text VALUE='" & Web_Const(20) & "' maxlength=6 id=Ltd_1 size=10 onkeypress='event.returnValue=IsDigit();'></TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>电子邮件：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Ltd_2 TYPE=text VALUE='" & Web_Const(21) & "' id=Ltd_2 size=40></TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>联系电话：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Ltd_3 TYPE=text VALUE='" & Web_Const(22) & "' id=Ltd_3 size=20></TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>传真号码：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Ltd_4 TYPE=text VALUE='" & Web_Const(23) & "' id=Ltd_4 size=20></TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>版权所有：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Ltd_5 TYPE=text VALUE='" & Web_Const(24) & "' id=Ltd_5 size=40></TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>备案号：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Ltd_6 TYPE=text VALUE='" & Web_Const(25) & "' id=Ltd_6 size=20></TD>"&_
		          "</TR>"&_
         "<TR>"&_
         "<TD WIDTH=20% HEIGHT=30 CLASS=Table8>底栏是否自定义：</TD>"&_
         "<TD CLASS=Table8><INPUT TYPE=radio CLASS='radio_all' NAME=Const_14 VALUE='1'"
		 IF Web_Const(14)=1 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & "> 允许　<INPUT TYPE=radio CLASS='radio_all' NAME=Const_14 VALUE='0'"
		 IF Web_Const(14)=0 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & ">禁止</TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=120 CLASS=Table8>底栏自定义内容：</TD>"&_
		          "<TD CLASS=Table8><TEXTAREA NAME=Const_15 cols=70 rows=7 id=Const_15>" & Web_Const(15) & "</TEXTAREA>　　支持HTML</TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=90 CLASS=Table8>IE状态栏显示信息：</TD>"&_
		          "<TD CLASS=Table8><TEXTAREA NAME=Const_8 cols=44 rows=5 id=Const_8>" & Web_Const(8) & "</TEXTAREA>　　HTML禁用，如果您不想自定义IE状态栏请输入“not”</TD>"&_
		          "</TR>"&_
		          "<TR ALIGN=center>"&_
		          "<TD HEIGHT=35 colspan=2 CLASS=Table6><a NAME=2></A>用户注册设置</TD>"&_
		          "</TR>"&_
         "<TR>"&_
         "<TD WIDTH=20% HEIGHT=30 CLASS=Table8>是否允许注册：</TD>"&_
         "<TD CLASS=Table8><INPUT TYPE=radio CLASS='radio_all' NAME=Reg_1 VALUE='1'"
		 IF Web_Const(36)=1 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & "> 打开　<INPUT TYPE=radio CLASS='radio_all' NAME=Reg_1 VALUE='0'"
		 IF Web_Const(36)=0 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & ">关闭</TD>"&_
		          "</TR>"&_
         "<TR>"&_
         "<TD WIDTH=20% HEIGHT=30 CLASS=Table8>注册验证码：</TD>"&_
         "<TD CLASS=Table8><INPUT TYPE=radio CLASS='radio_all' NAME=Reg_3 VALUE='1'"
		 IF Web_Const(38)=1 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & "> 打开　<INPUT TYPE=radio CLASS='radio_all' NAME=Reg_3 VALUE='0'"
		 IF Web_Const(38)=0 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & ">关闭　　防止恶意注册建议打开此功能</TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=120 CLASS=Table8>注册协议：</TD>"&_
		          "<TD CLASS=Table8><TEXTAREA NAME=Reg_2 cols=70 rows=7 id=Reg_2>" & Web_Const(37) & "</TEXTAREA>　　HTML支持</TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>用户名过滤：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Reg_0 TYPE=text VALUE='" & Web_Const(35) & "' id=Reg_0 size=35>　　禁止注册用户名中含有这些字符，可输入多项，用“,”隔开</TD>"&_
		          "</TR>"&_
		          "<TR>"&_
		          "<TD HEIGHT=30 CLASS=Table8>相同IP重复注册时间：</TD>"&_
		          "<TD CLASS=Table8><INPUT NAME=Reg_4 TYPE=text VALUE='" & Web_Const(39) & "' id=Reg_4 size=10 onkeypress='event.returnValue=IsDigit();'>　　单位为分钟，可限制同一IP用户连续恶意注册</TD>"&_
		          "</TR>"&_
         "<TR>"&_
         "<TD WIDTH=20% HEIGHT=30 CLASS=Table8>相同Email重复注册：</TD>"&_
         "<TD CLASS=Table8><INPUT TYPE=radio CLASS='radio_all' NAME=Reg_5 VALUE='1'"
		 IF Web_Const(40)=1 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & "> 允许　<INPUT TYPE=radio CLASS='radio_all' NAME=Reg_5 VALUE='0'"
		 IF Web_Const(40)=0 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & ">禁止</TD>"&_
		          "</TR>"&_
         "<TR>"&_
         "<TD WIDTH=20% HEIGHT=30 CLASS=Table8>是否发送注册邮件：</TD>"&_
         "<TD CLASS=Table8><INPUT TYPE=radio CLASS='radio_all' NAME=Reg_9 VALUE='1'"
		 IF Web_Reg(9)=1 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & "> 发送　<INPUT TYPE=radio CLASS='radio_all' NAME=Reg_9 VALUE='0'"
		 IF Web_Reg(9)=0 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & ">不发送</TD>"&_
		          "</TR>"&_        
 "<TR>"&_
         "<TD WIDTH=20% HEIGHT=30 CLASS=Table8>注册是否需要审核：</TD>"&_
         "<TD CLASS=Table8><INPUT TYPE=radio CLASS='radio_all' NAME=Reg_6 VALUE='0'"
		 IF Web_Const(41)=0 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & "> 需要　<INPUT TYPE=radio CLASS='radio_all' NAME=Reg_6 VALUE='1'"
		 IF Web_Const(41)=1 THEN
strIfa = strIfa & " checked "
		          End IF
strIfa = strIfa & ">不需要</TD>"&_
12 3 下一页
⌨️ 快捷键说明

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