<!-- #include file="conn.asp" -->
<!-- #include file="admin.asp" -->
<%call ling()
Call Head%>
<%Call saycarda("广告管理中心")
IF KEY<>0 then
  Call Error("你的权限不足！")
  end if
response.write"<a href=""admin_go.asp?TP=1&amp;sid="&sid&"&amp;saytk="&saytk&""">1.主站页面广告</a>"
dim adset1name
if adsetkf("ads1")=1 then
adset1name="显示"
else
adset1name="不显示"
end if

response.write"<br/>状态:固定显示"

response.write"<br/><a href=""admin_go.asp?TP=2&amp;sid="&sid&"&amp;saytk="&saytk&""">2.社区页面广告</a>"

dim adset2name
if adsetkf("ads2")=1 then
adset2name="显示"
else
adset2name="不显示"
end if
response.write"<br/>状态:<a href=""adcase.asp?TP=2&amp;sid="&sid&"&amp;saytk="&saytk&""">"&adset2name&"</a>"

response.write"<br/><a href=""admin_go.asp?TP=3&amp;sid="&sid&"&amp;saytk="&saytk&""">3.文件栏目广告</a>"
'==========

dim adset3name
if adsetkf("ads3")=1 then
adset3name="显示"
else
adset3name="不显示"
end if
response.write"<br/>状态:<a href=""adcase.asp?TP=3&amp;sid="&sid&"&amp;saytk="&saytk&""">"&adset2name&"</a>"

response.write"<br/><a href=""admin_go.asp?TP=4&amp;sid="&sid&"&amp;saytk="&saytk&""">4.文章栏目广告</a>"


dim adset4name
if adsetkf("ads4")=1 then
adset4name="显示"
else
adset4name="不显示"
end if
response.write"<br/>状态:<a href=""adcase.asp?TP=4&amp;sid="&sid&"&amp;saytk="&saytk&""">"&adset4name&"</a>"

response.write"<br/><a href=""admin_go.asp?TP=5&amp;sid="&sid&"&amp;saytk="&saytk&""">5.图片栏目广告</a><br/>"
dim adset5name
if adsetkf("ads5")=1 then
adset5name="显示"
else
adset5name="不显示"
end if
response.write"状态:<a href=""adcase.asp?TP=5&amp;sid="&sid&"&amp;saytk="&saytk&""">"&adset5name&"</a><br/>"
response.write"<a href=""enter/adminads.asp?sid="&sid&"&amp;saytk="&saytk&""">点广告送币系统</a><br/>"&chr(13)
response.write"------------<br/>"&chr(13)
response.write"<a href='index.asp?sid="&sid&"&amp;saytk="&saytk&"'>[后台管理]</a>"
conn.close
set conn=nothing
response.write"" 
%><br/>
报时: <%=String(2-Len(hour(now)),"0") & hour(now) %>:<%=String(2-len(minute(now)),"0") & minute(now) %>
<%call headsay()%>
