<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!--#include file="../inc/charsetasp.asp"-->
<!DOCTYPE html>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
<%
Const dbpath = "../"
Const funpath = "../"
%>
<!--#include file="admin_fun.asp"-->
<!--#include file="../core/md5.asp"-->
<!--#include file="../crinc/pcbginc171026.asp"-->
<!--#include file="../inc/pcbg171026f8ir85.asp"-->
<%
Set ctr_admin = New tr_admin
If InStr(","&adminlimitidrange&",", ",")<1 Then contrl_message "您没有访问权限，请尝试其他版块。", "", "", "", ""
action = Trim(request.Form("action"))
If action<>"" And adminctrllimit = 1 Then Call contrl_message ("您只有查看权限，没有管理权限，请升级权限后继续操作。", "", "", "", "")
Select Case action
  Case "edit"
call crpcdsinc171026("utf-8")
    Call admin_log(adminname, adminid, adminname&" 修改整站背景图功能成功。")
    Call contrl_message ("修改整站背景图功能成功。", "", "submit1", "", "")
End Select
%>
<title>整站背景图功能管理<%=application(siternd & "55trsitename")%></title>
<link rel="stylesheet" type="text/css" href="./skin/default/style.css">
<link rel="stylesheet" href="../kindeditor_4.1.10/themes/default/default.css">
<base target="_self">
<script type="text/javascript" src="./js/js.js"></script>
<script type="text/javascript" src="./js/hover.js"></script>
<script charset="ut<%%>f-8" src="../kindeditor_4.1.10/kindeditor-min.js"></script>
<script charset="ut<%%>f-8" src="../kindeditor_4.1.10/lang/zh_CN.js"></script>
<script src="../js/jscolor.min171026.js"></script>
</head>
<body>
<form name="form1" id="form1" target="ifr1" method="post" >
<table width="100%" align="center" border="0" cellpadding="3" cellspacing="1" id="mytable" class="size3" >
<tr class="tr1" >
<td class="td_title" colspan="17"><!--#include file="incgoback.asp"-->■ 电脑版背景图功能编辑 </td>
</tr>
<tr>
<td width="20%" align="right">开通关闭</td>
<td width="80%" align="left"><label>
<input name="isopen" type="radio" id="isopen1" value="1" <%if isopen=1 then%>checked="checked"<%end if%>>
开通</label>
<br>
<label>
<input name="isopen" type="radio" id="isopen2" value="0" <%if isopen=0 then%>checked="checked"<%end if%>>
关闭</label></td>
</tr>
<tr>
<td align="right">&nbsp;背景图上传：</td>
<td colspan="3"><%call crtrupimgstr171026("imageqplssitebgimg","filemanagerqplssitebgimg","qplssitebgimg",funpath)%>
<input type="text" id="qplssitebgimg" name="qplssitebgimg" value="<%=qplssitebgimg%>" class="input2 size19">
<input type="button" id="imageqplssitebgimg" value="上传本地图片" class="button8 mar2">
|
<input type="button" id="filemanagerqplssitebgimg" value="浏览服务器图片" class="button8 mar2"></td>
</tr>
<tr>
<td align="right">&nbsp;背景图片显示类型</td>
<td colspan="3"><label>
<input name="sitebgbgimgtype" id="sitebgbgimgtype1" type="radio" value="1" <%if sitebgbgimgtype=1 then%>checked="checked"<%end if%>>
重复排列</label>
<label>
<input name="sitebgbgimgtype" id="sitebgbgimgtype2" type="radio" value="2" <%if sitebgbgimgtype=2 then%>checked="checked"<%end if%>>
拉伸全屏</label>
<label>
<input name="sitebgbgimgtype" id="sitebgbgimgtype3" type="radio" value="3" <%if sitebgbgimgtype=3 then%>checked="checked"<%end if%>>
节日模式</label></td>
</tr>
<tr>
<td align="right">背景图纯色颜色：</td>
<td colspan="3"><label><input type="checkbox" name="opensitebgzdybg1" id="opensitebgzdybg1" value="1" <%if opensitebgzdybg1=1 then%>checked<%end if%>>开启颜色</label> | <input name="sitebgzdybg1" id="sitebgzdybg1" type="text" class="input2 size19 jscolor" value="<%=sitebgzdybg1%>">
点击文本框取色 </td>
</tr>
<tr>
<td align="right">&nbsp;衬托背景模式</td>
<td colspan="3">
<label>
<input name="opensitebgctbg" id="opensitebgctbg1" type="radio" value="0" <%if opensitebgctbg=0 then%>checked="checked"<%end if%>>
关闭 </label>

<label>
<input name="opensitebgctbg" id="opensitebgctbg2" type="radio" value="1" <%if opensitebgctbg=1 then%>checked="checked"<%end if%>>
普通模式</label>

<label>
<input name="opensitebgctbg" id="opensitebgctbg3" type="radio" value="2" <%if opensitebgctbg=2 then%>checked="checked"<%end if%>>
节日模式</label>

（衬托背景是将页面的主窗体加上背景，防止主窗体与背景图片颜色类似影响页面阅读）</td>
</tr>
<tr>
<td align="right">衬托背景颜色：</td>
<td colspan="3"><label><input type="checkbox" name="opensitectbgzdybg1" id="opensitectbgzdybg1" value="1" <%if opensitectbgzdybg1=1 then%>checked<%end if%>>开启颜色</label> | <input name="sitectbgzdybg1" id="sitectbgzdybg1" type="text" class="input2 size19 jscolor" value="<%=sitectbgzdybg1%>">
点击文本框取色 </td>
</tr>
<tr>
<td align="right">衬托背景宽度：</td>
<td colspan="3"><label><input type="checkbox" name="opensitebgzdywidth100" id="opensitebgzdywidth100" value="1" <%if opensitebgzdywidth100=1 then%>checked<%end if%>>全屏宽度</label> | <input name="sitebgzdywidth" id="sitebgzdywidth" type="text" class="input2 size19" value="<%=sitebgzdywidth%>">
输入数字，单位px（像素）一般为主窗体宽度1200左右，多试几次</td>
</tr>
<tr>
<td align="right">衬托背景顶部距离：</td>
<td colspan="3"><input name="sitebgzdytop" id="sitebgzdytop" type="text" class="input2 size19" value="<%=sitebgzdytop%>">
输入数字，单位px（像素）</td>
</tr>
<tr>
<td colspan="2" align="center"><input type="hidden" value="edit" name="action" id="action">
<input type="submit" value=" 立即修改 " name="submit1" id="submit1" class="button1"></td>
</tr>
<tr>
<td colspan="16" align="left"><p>小提示：此插件可实现多种背景图的效果，具体细节及注意事项请查看官网应用中心关于此插件的详情介绍</p></td>
</tr>
</table>
</form>
<script type="text/javascript" >
showtable("mytable")
</script> 
<!--#include file="../inc/ifr.asp"-->
</body>
</html>
<%
function getfor910221()
dim a
a = 0
for i = 1 to 10
    for j = 1 to 1
        a = a + 1
        if i = 5 then
            exit for
        end If
        Response.write a & "<br/>"
    next
next
end function
%>