一、我修改的显示新闻属性的后台新闻浏览页面
修改方法如下:
在admin/info/newslist.asp中找到:
<div align="left">新闻</div>
改成:
<div align="left">
<%
if RsNewsObj("MarqueeNews")=1 then response.Write("<font color=green>/滚</font>") end if
if RsNewsObj("TodayNewsTF")=1 then response.Write("<font color=green>/头</font>") end if
if RsNewsObj("RecTF")=1 then response.Write("<font color=green>/荐</font>") end if
if RsNewsObj("SBSNews")=1 then response.Write("<font color=green>/并</font>") end if
if RsNewsObj("ProclaimNews")=1 then response.Write("<font color=green>/公</font>") end if
if ContentTypeStr=3 then
if RsNewsObj("FilterNews")=1 then response.Write("<font color=red>/幻</font>") end if
if RsNewsObj("FocusNewsTF")=1 then response.Write("<font color=red>/焦</font>") end if
if RsNewsObj("ClassicalNewsTF")=1 then response.Write("<font color=red>/精</font>") end if
end if
%> </div>
另外大家可以试一下把每行后面的"end if"取掉吧,我觉得可以不要,你们试试
新闻热点
疑难解答