config.asp
来自「☆☆网吧客户留言簿☆☆ 管理用户名和密码都是:admin 演示：http:/」· ASP 代码 · 共 208 行
ASP
208 行
<!-- #include file="common.asp" -->
<!-- #include file="isadm.asp" -->
<%
Dim zsb_auth, hasAuth
hasAuth = False
zsb_auth = Split( Trim( session("zsb_auth") ), ",", -1, 1 )
For Each auth In zsb_auth
If ( auth = "config" ) Then
hasAuth = True
Exit For
End If
Next
If hasAuth = false Then
Response.Write("<script language=javascript>alert('对不起，你没有权限，请联系超级管理员！');location.href='manage.asp';</script>")
End If
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>留言本设置</title>
<link href="<%=GBCss%>/common.css" rel="stylesheet" type="text/css">
</head>
<body>
<%
set rs=Server.CreateObject("ADODB.Recordset")
sqlstr="select * from Config"
rs.open sqlstr,conn,1,3
if not rs.eof then
%>
<table width="650" border="0" align="center" cellpadding="0" cellspacing="0">
<tr><td height="20"> </td></tr>
<tr>
<td height="30" bgcolor="#FFFFFF" align="center" style="background-image:url(<% =GBSkin %>/guest_top.gif) " class="guest_name"><b>留言本系统设置</b></td>
</tr>
</table>
<table width="650" border="0" align="center" cellpadding="0" cellspacing="5" bgcolor="#FFFFFF" style="background-image:url(<% =GBSkin %>/guest_bg.gif) ">
<form name="lyform" method="POST" action="ConfigSave.asp">
<tr>
<td height="20" class="guest_name"> 留言本名称：
<input name="GBName" type="text" id="GBName" class="input_common" style="width: 300px; height:18px;" value="<% =rs("GB_Name") %>"></td>
</tr>
<tr>
<td height="20" class="guest_name"> 顶部图像：
<input name="LogoIMG" type="text" id="LogoIMG" class="input_common" style="width: 200px; height:18px;" value="<% =rs("Logo_IMG") %>" size="15">
（最大710 x 65）</td>
</tr>
<tr>
<td height="20" class="guest_name"> 版权说明：
<input name="CopyTXT" type="text" id="CopyTXT" class="input_common" style="width: 350px; height:18px;" value="<% =rs("CopyRight") %>" size="15"></td>
</tr>
<tr>
<td height="20" class="guest_name"> 留言是否需要审核：
<% if rs("ifNeedAuditing")=True Then %><input name="ifNeedAuditing" type="checkbox" id="ifNeedAuditing" value="1" checked><% else %><input name="ifNeedAuditing" type="checkbox" id="ifNeedAuditing" value="1"><% end if %>
</td>
</tr>
<tr>
<td height="20" class="guest_name"> 每页显示留言条数：
<input name="GNum" type="text" id="GNum" class="input_common" style="width: 50px; height:18px;" value="<% =rs("Guest_Num") %>" size="15"></td>
</tr>
<tr>
<td height="20" class="guest_name"> 置顶公告：
<% if rs("News_View")=True then %><input name="NewsV" type="checkbox" id="NewsV" value="1" checked><% else %><input name="NewsV" type="checkbox" id="NewsV" value="1"><% end if %>
（选上为显示）</td>
</tr>
<tr>
<td height="20" class="guest_name"> 公告签名：
<input name="NewsLabel" type="text" id="NewsLabel" class="input_common" style="width: 480px; height:18px;" value="<% =rs("News_Label") %>" size="28"></td>
</tr>
<tr>
<td height="20" class="guest_name"> 留言本风格：
<select name="skin" id="skin">
<% if Trim(rs("SkinStr"))="red" then %>
<option value="blue" selected>浅蓝色调</option>
<option value="red" selected>粉红之梦</option>
<option value="green">绿色风情</option>
<% elseif Trim(rs("SkinStr"))="blue" then %>
<option value="blue" selected>浅蓝色调</option>
<option value="red">粉红之梦</option>
<option value="green">绿色风情</option>
<% elseif Trim(rs("SkinStr"))="green" then %>
<option value="blue">浅蓝色调</option>
<option value="red">粉红之梦</option>
<option value="green" selected>绿色风情</option>
<% end if %>
<option value="red">粉红之梦</option>
<option value="green">绿色风情</option>
</select></td>
</tr>
<tr>
<td height="20" class="guest_name"> 刷新自动改变风格：<% if rs("AlterSkin")=True then%>
<input name="ASkin" type="checkbox" id="ASkin" value="1" checked>
<% else %>
<input name="ASkin" type="checkbox" id="ASkin" value="1">
<% end if %>
（取消后不自动改变风格）</td>
</tr>
<tr>
<td height="20" class="guest_name"> 页面链接一：
<input id="Link_one" name="Link_one" type="text" class="input_common" style="width: 480px; height:18px;" value="<% =rs("Link_one") %>" size="28"></td>
</tr>
<tr>
<td height="20" class="guest_name"> 页面链接二：
<input id="Link_two" name="Link_two" type="text" class="input_common" style="width: 480px; height:18px;" value="<% =rs("Link_two") %>" size="28"></td>
</tr>
<tr>
<td height="20" class="guest_name"> 页面链接三：
<input id="Link_three" name="Link_three" type="text" class="input_common" style="width: 480px; height:18px;" value="<% =rs("Link_three") %>" size="28"></td>
</tr>
<tr align="center">
<td height="30">
<input type="button" value="返 回" onClick="javascript:history.back(-1);" class="button_common" style="width: 80px; height:18px;">
<input type="reset" value="重新填写" class="button_common" style="width: 80px; height:18px;">
<input name="按钮" type="button" onClick="javascript:lysubmit()" value="保存设置" class="button_common" style="width: 80px; height:18px;">
</td>
</tr>
</form>
</table>
<% end if %>
<script language=javascript>
<!--
function lysubmit() {
if (lyform.GBName.value=="") {
alert("请输入留言本名称!");
lyform.GBName.focus();
return false;
}
if (lyform.CopyTXT.value=="") {
alert("请输入版权信息!");
lyform.CopyTXT.focus();
return false;
}
lyform.submit();
return true;
}
//-->
</script>
<SCRIPT language=JavaScript>
function statusMessageObject(p,d) {
this.msg = MESSAGE
this.out = " "
this.pos = POSITION
this.delay = DELAY
this.i = 0
this.reset = clearMessage
}
function clearMessage() {
this.pos = POSITION
}
var POSITION = 100
var DELAY = 5
var MESSAGE = "☆☆网吧留言簿☆☆欢迎您留言!谢谢!! "
var scroll = new statusMessageObject()
function scroller() {
for (scroll.i = 0; scroll.i < scroll.pos; scroll.i++) {
scroll.out += " "
}
if (scroll.pos >= 0)
scroll.out += scroll.msg
else scroll.out = scroll.msg.substring(-scroll.pos,scroll.msg.length)
window.status = scroll.out
scroll.out = " "
scroll.pos--
if (scroll.pos < -(scroll.msg.length)) {
scroll.reset()
}
setTimeout ('scroller()',scroll.delay)
}
function snapIn(jumpSpaces,position) {
var msg = scroll.msg
var out = ""
for (var i=0; i<position; i++)
{out += msg.charAt(i)}
for (i=1;i<jumpSpaces;i++)
{out += " "}
out += msg.charAt(position)
window.status = out
if (jumpSpaces <= 1) {
position++
if (msg.charAt(position) == ' ')
{position++ }
jumpSpaces = 100-position
} else if (jumpSpaces > 3)
{jumpSpaces *= .75}
else
{jumpSpaces--}
if (position != msg.length) {
var cmd = "snapIn(" + jumpSpaces + "," + position + ")";
scrollID = window.setTimeout(cmd,scroll.delay);
} else {
window.status=""
jumpSpaces=0
position=0
cmd = "snapIn(" + jumpSpaces + "," + position + ")";
scrollID = window.setTimeout(cmd,scroll.delay);
return false
}
return true
}
snapIn(100,0);
// -->
</SCRIPT>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?