对新云防采集的一处修改

2019-03-12 09:06:59来源： http://www.qqnc.cc/ 阅读 ()

列表页修改：

打开INC目录下NewsChannel.asp文件，找到 ArticleTitle = "<a href='" & ArticleUrl & "' title='" & Rs("title") & "' class=""showtopic"">" & sTitle & "</a>"

替换为

'此处文章列表经过空心菜修改
'此处文章列表经过空心菜修改
If Rs("ArticleID") Mod 2 = 0 then
ArticleTitle = "<a id=" & Rs("ArticleID") & " href='" & ArticleUrl & "' title='" & Rs("title") & "' target=""_blank"">" & sTitle & "</a>"
Else
ArticleTitle = "<a id='" & Rs("ArticleID") & "' href=" & ArticleUrl & " title='" & Rs("title") & "' target=""_blank"">" & sTitle & "</a>"
End if

内容页修改（防采集，添加随机广告）：

打开INC目录下NewsChannel.asp文件，找到 TempContent = "<div id=""NewsContentLabel"" class=""NewsContent"">" & strContent & "</div><div id=""Message"" class=""Message""></div>"

替换为

'此处经过空心菜修改
Dim num,bid
Randomize
num   =   Int((3 * Rnd) + 1)
bid   =   Int((3 * Rnd) + 1)
   TempContent = "<div id=id2" & num & " class=ggao>广告加载中</div>" & strContent & "<div id=id3" & bid & " class=ggao>广告加载中</div>"

注释：<div id=id2" & num & " class=ggao>广告加载中</div>这里一共显示3个随机广告，标志分别为21 22 23

<div id=id3" & bid & " class=ggao>广告加载中</div>这里一共也是显示3个随机广告，标志分别为31 32 33

然后在内容页模板里加上下面的代码

<SPAN class=spanclass id=span_33>
这里放广告代码
</SPAN>
<SCRIPT>
id33.innerHTML=span_33.innerHTML;
span_33.innerHTML="";
</SCRIPT>

这段代码需要放在内容页模板最下面，放6次，红色的id33需要改变，依次为id21 id22 id23 id31 id32 id33

相关的演示可以参考我的小站：http://www.qqnc.cc/，同时有疑问的地方也可以Q我，我有时间的情况下可以免费帮你解决。

标签：

版权申明：本站文章部分自网络，如有侵权，请联系：west999com@outlook.com
特别注意：本站所有转载文章言论不代表本站观点，本站所提供的摄影照片，插画，设计作品，如需使用，请与原作者联系，版权归原作者所有