📄 ad_setting_summary.asp
字号:
<%@ LANGUAGE = VBScript.Encode %><!--#include file="../../inc/verify_user.inc" -->
<!--#include file="../../inc/conn.inc" -->
<%
Set rs = Server.CreateObject("ADODB.Recordset")
sql="select * from user_role where userid=" + cstr(session("userid")) + " and group_id=" + request("group_id")
rs.open sql,conn,0,1
if rs.eof then
result=0 '无设置权限
else
if instr(rs("role_property"),"b")<>0 then
result=1 '有设置权限
else
result=0 '无设置权限
end if
end if
rs.close
if instr(session("global_access"),"G")<>0 then result=1 '有设置权限
if result=1 then '有设置权限
sql="select * from ad_info where group_id=" + request("group_id") + " order by ad_id Desc"
rs.open sql,conn,0,1
end if
%>
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="../../css/ads.css" type="text/css">
</head>
<SCRIPT language=javascript>
function popwin(url)
{
window.open(url,"","height=400,width=580,resizable=yes,scrollbars=yes,status=no,toolbar=yes,menubar=no,location=no");
}
</SCRIPT>
<body bgcolor="#FFFFFF" text="#000000">
<!--#include file="../../inc/top.inc" -->
<p> </p>
<% if result=1 then %>
<p><b><img src="../../images/iico.gif" width="15" height="15" align="absmiddle">
<span class="px14">请选择广告参数：</span></b></p>
<form method="post" action="" class="px14" name="">
<table width="458" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="7">
<div align="right"><img
height=24 src="../../images/grey_lft.gif"
width=6></div>
</td>
<td width="78" background="../../images/grey_bg.gif">
<div align="center"><a href="ad_setting_summary.asp?group_id=<%=request("group_id")%>" class="px14_noline">基本状态</a></div>
</td>
<td width="6"><img height=24
src="../../images/grey_rt.gif"
width=6></td>
<td width="7">
<div align="right"><img
height=24 src="../../images/gold_lft.gif"
width=6></div>
</td>
<td width="83" background="../../images/gold_bg.gif">
<div align="center"><a href="ad_setting_ratio.asp?group_id=<%=request("group_id")%>" class="px14_noline">显示比设定</a></div>
</td>
<td width="6"><img height=24
src="../../images/gold_rt.gif"
width=6></td>
<td width="7">
<div align="right"><img
height=24 src="../../images/gold_lft.gif"
width=6></div>
</td>
<td width="78" background="../../images/gold_bg.gif" class="px14">
<div align="center"><a href="ad_setting_condition.asp?group_id=<%=request("group_id")%>" class="px14_noline">设置条件</a></div>
</td>
<td width="6"><img height=24
src="../../images/gold_rt.gif"
width=6></td>
<td width="7">
<div align="right"><img
height=24 src="../../images/gold_lft.gif"
width=6></div>
</td>
<td width="78" background="../../images/gold_bg.gif" class="px14">
<div align="center"><a href="ad_setting_edit.asp?group_id=<%=request("group_id")%>" class="px14_noline">修
改</a></div>
</td>
<td width="6"><img height=24
src="../../images/gold_rt.gif"
width=6></td>
<td width="7">
<div align="right"><img
height=24 src="../../images/gold_lft.gif"
width=6></div>
</td>
<td width="78" background="../../images/gold_bg.gif" class="px14">
<div align="center"><a href="ad_setting_counter.asp?group_id=<%=request("group_id")%>" class="px14_noline">计数设置</a></div>
</td>
<td width="10"><img height=24
src="../../images/gold_rt.gif"
width=6></td>
</tr>
</table>
<table width="617" border="0" cellspacing="1" cellpadding="2" bgcolor="#000000">
<tr bgcolor="#000099">
<td width="124">
<div align="center"><font color="#FFFFFF" class="px14">标 题</font></div>
</td>
<td width="152">
<div align="center"><font color="#FFFFFF" class="px14">缩 图</font></div>
</td>
<td width="142">
<div align="center"><font color="#FFFFFF" class="px14">当 前 状 态</font></div>
</td>
<td width="49">
<div align="center"><font color="#FFFFFF" class="px14">显示比</font></div>
</td>
<td width="124">
<div align="center"><font color="#FFFFFF" class="px14">状 态 设 定</font></div>
</td>
</tr>
<% do while not rs.eof %>
<tr bgcolor="#CCCCCC">
<td width="124" height="8" class="pt9"><a href="../report/ad_report_summary.asp?ad_id=<%=rs("ad_id")%>"><%=rs("title")%></a></td>
<td width="152" height="8" class="pt9">
<%
select case rs("interface_type")
case 1
response.write "<a href=" & rs("link_url") & " target=_blank><img src=" & rs("pic_url") & " width=150 height=40 border=0></a>"
case 2
response.write "Flash广告，[<a href=javascript:popwin('../code/flash_link_code.asp?ad_id=" & cstr(rs("ad_id")) & "&group_id=" & request("group_id") & "')>预览和取得连接</a>]"
end select
%>
</td>
<td width="142" height="8" class="pt9">
<%
select case rs("status")
case 1
response.write "<font color=green># 正在播放</font>"
if rs("is_show_limit")=1 then response.write "<br>* 显示超过" & cstr(rs("show_limit")) & "次后停止"
if rs("is_hit_limit")=1 then response.write "<br>* 点击超过" & cstr(rs("hit_limit")) & "次后停止"
if rs("schedule_type")=1 then response.write "<br>* " & cstr(rs("schedule_date")) & "后停止播放"
case 0
response.write "<font color=red># 已停止播放</font>"
end select
%>
</td>
<td width="49" height="8" class="pt9" align="center">
<%
if rs("status")=1 then
response.write cstr(rs("show_ratio")) & "％"
else
response.write "N/A"
end if
%>
</td>
<td width="124" height="8" class="pt9" align="center">
<% if rs("status")=0 then %>
<a href="start_ad.asp?ad_id=<%=rs("ad_id")%>&group_id=<%=request("group_id")%>">
<img src="../../images/on_show.gif" width="20" height="20" align="absmiddle" border="0"></a>
开始
<% end if %>
<% if rs("status")=1 then %>
<a href="stop_ad.asp?ad_id=<%=rs("ad_id")%>&group_id=<%=request("group_id")%>">
<img src="../../images/on_stop.gif" width="20" height="20" align="absmiddle" border="0"></a>
停止
<% end if %>
<a href="ad_setting_schedule.asp?group_id=<%=request("group_id")%>&ad_id=<%=rs("ad_id")%>"><img src="../../images/on_schedule.gif" width="20" height="20" align="absmiddle" border="0"></a>
计划 </td>
</tr>
<%
rs.movenext
loop
rs.close
%>
</table>
</form>
<% else %>
<table width="321" border="0" cellspacing="1" cellpadding="2">
<tr>
<td class="px14"><b><font color="#FF0000">权限不足，无法进行此操作！</font></b></td>
</tr>
</table>
<% end if %>
<p> </p>
<!--#include file="../../inc/bottom.inc" -->
</body>
</html>
<%
set rs=nothing
conn.close
set conn=nothing
%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -