网络编程
位置:首页>> 网络编程>> Asp编程>> 谈中国站长站的文章干扰码实现方法(2)

谈中国站长站的文章干扰码实现方法(2)

 来源:asp之家 发布时间:2007-10-13 11:13:00 

标签:干扰码,随机,中国站长站,随机字符

下面来说一下asp的实现中国站长站文章干扰码的方法:

原理:使用asp中的replace函数来替换指定的</p>,分两次替换:


str="文章内容"
str=replace(str,"</p>"," </p>")
str=replace(str," </p>","随机干扰码")


怎么做到随机添加干扰码呢?您可以先看看这个文章《8个asp生成随机字符的函数

我们使用8个asp生成随机字符的函数这篇文章中的第3个随机生成字符方法:


dim a(5)
randomize 
t=int(rnd*5) 
a(0)="yingyu" 
a(1)="laoda" 
a(2)="wangzhan" 
a(3)="maiwangzhan" 
a(4)="hehe" 


这里定义了一个数组用来存放特定的随机干扰码,如果有更多的干扰码就一直加进去,改下数字就可以了,这里以5个随机干扰码为例:


dim a(5)
randomize 
t=int(rnd*5) 
a(0)="<p class='Wsc965'>Chinaz.com</p>" 
a(1)="<div class='Wsc965'>Chinaz_com</div>" 
a(2)="<span class='Wsc965'>中国.站长站</span>" 
a(3)="<p class='Wsc965'>站.长站</p>" 
a(4)="<font color='#F5FAFE'>Chinaz_com</font>" 


这里注意一下干扰码的样式或颜色要与文章内容的背景色相同,这样才不会影响大家的正常阅读!

有了这个我们来替换</p>就方便了。注意你不能一次使用replace替换掉:


<%
str="<p>谈中国站长站的文章干扰码实现方法!</p> <p>献丑了,谢谢大家捧场!</p> <p>来源:asp之家! </p> <p>asp之家 致力于为Asp学习者提供专业而高质量的Asp内容 </p> <p>作者:天空诚 </p> <p>asp之家网址:http://www.aspxhome.com </p> <p>谈中国站长站的文章干扰码实现方法</p>"
'这里str在实际使用时换成你文章的内容
dim a(5)
randomize 
t=int(rnd*5) 
a(0)="<p class='Wsc965'>Chinaz.com</p>" 
a(1)="<div class='Wsc965'>Chinaz_com</div>" 
a(2)="<span class='Wsc965'>中国.站长站</span>" 
a(3)="<p class='Wsc965'>站.长站</p>" 
a(4)="<font color='#F5FAFE'>中国站长站</font>"
'这些干扰码在实际使用时为了修改方便可以保存在数据库中,使用时调用
str=replace(str,"</p>"," </p>")
str=replace(str," </p>",a(t))
response.write str
%>


如果你直接使用上面的str=replace(str," </p>",a(t))来替换的话,程序会随机调用一个干扰字符一次性替换掉所有的" </p>",而这个不是我们要的效果。我们要的是替换每一个" </p>"都是随机的字符。

这里我使用的方法是:先用split(str," </p>")函数来保存文章内容到一个数组,再加入随机干扰码后最后连接起来,不知道还有没有更好的方法,欢迎讨论!

源代码如下:


<%
str="<p>谈中国站长站的文章干扰码实现方法!</p> <p>献丑了,谢谢大家捧场!</p> <p>来源:asp之家!</p> <p>asp之家 致力于为Asp学习者提供专业而高质量的Asp内容</p> <p>作者:天空诚</p> <p>asp之家:http://www.aspxhome.com </p> <p>谈中国站长站的文章干扰码实现方法</p>"
dim a(5)
randomize 
a(0)="<p class='Wsc965'>Chinaz.com</p>" 
a(1)="<div class='Wsc965'>Chinaz_com</div>" 
a(2)="<span class='Wsc965'>中国.站长站</span>" 
a(3)="<p class='Wsc965'>站.长站</p>" 
a(4)="<font color='#F5FAFE'>中国站长站</font>"
str=replace(str,"</p>"," </p>")
str2=split(str," </p>")
for i=0 to ubound(str2)
   t=int(rnd*5) 
   str3=str3&str2(i)&a(t)&"</p>" 
next
response.write str3
%>

呵呵,到这里中国站长站的文章干扰码功能已经差不多完成了。这里有个细节我们要注意一下:就是当程序处理到了文章中的最后一个"</p>"时,我们要考虑文章内容中的最后一个</p>后是否还有内容,如果没有内容的话,文章就多加了一个干扰码,当然这个也没什么问题。如果想解决这个问题可以加一个判断:


if str2(i)<>"" then  str3=str3&str2(i)&a(t)&"</p>"  


有什么问题,欢迎大家留言

看看续篇:如何过滤中国站长站(chianz)文章干扰码 (2008-1-4)

0
投稿

猜你喜欢

  • 目的是想通过给定一个ID,取出所有的子ID,包括子ID的子ID。一开始写成FUNCTION,因为FUNCTION调用方便,但是报错:ERRO
  • 在今天网络开发方面,JavaScript起了很关键的作用;像jQuery, MooTools, Prototype等等JavaScript框
  • 在 EeePC 上装了个 Mac OS X,相应的开发工具也选择了 Coda。在
  • 功能: 1、 允许/限制对表的修改 2、 自动生成派生列,比如自增字段 3、 强制数据一致性 4、 提供审计和日志记录 5、 防止无效的事务
  • 一、读者指引读者指引帮助你掌握本文的梗概。以免你看了大半才明白这编文章不适合你,给你造成视觉污染。如果你正在用ASP+XML写一些程序,或者
  • 了兑现我对大家的承诺,我们现在立即就将&ldquo;借助数据库和ASP程序&rdquo;编写出来的,可以同时适用于IIS和P
  • 昨天用ucweb看到了goos发的一篇帖子:谁说Float菜单不可以水平居中,进去看了看,觉得方法有点繁琐了,用到了负边距,position
  • 今天来说说鄙人对input输入框在处理上的细节处理和心得,其实制作一个符合CSS标准、FF/IE7/IE6等主流浏览器全兼容、符合用户体验的
  • 在应用系统中,尤其在联机事务处理系统中,对数据查询及处理速度已成为衡量应用系统成败的标准。而采用索引来加快数据处理速度也成为广大数据库用户所
  • 看新闻说Chrome的Javascript引擎很强大,执行速度很快。就随便写了一个1,000,000次的累加放到IE和Chrome下测试,效
  • 有没有曾经为IE浏览器中长按钮莫名其妙的padding感到困扰?在分析解决方法之前,我们首先来看一下问题所在。在IE中,如果按钮文本比较长,
  • Photoshop Express,也就是传说中的web版photoshop,来了。和想象中的web photoshop相比,这个Photo
  • 熟悉css的开发者一定知道图像替换技术,也深知它的意义,Dave Shea 曾在他的一篇文章对此做了详细的总结,参看 Dave Shea’s
  • 最近开始在项目中使用Quickwork For Asp,虽然该框架是自己独立完成的,不过功能没做过详细的总结,所以很多参数总是会弄错,毕竟鱼
  • &copy; 版权符号显示不清楚,就是那个圈C,在某些网站上就是显示太小,看不清楚。一开始还以为是字体大小的原因,调大以后,还是一样
  • original article by sp(’Sergio Pereira’) Sergio Pereiralast update: Ma
  • 作者:AngelGavin  出处:CSDNInternet Explorer 5.0 对 XML 提供哪个级别的支持?Inter
  • 最近在查看asp之家的访客统计时,发现访客使用firefox浏览器的占了10%-15%,而大部分的访客使用的是IE6,呵呵我也是用IE6。而
  • 在存储过程中,请问如何判断所指定表的字段的类型?由于表和视图的每一列在SYSCOLUMNS表中都有详细资料,所以,我们只管从中取用来即可,很
  •  代码如下:---涂聚文 Geovin Du DECLARE @myid uniqueidentifier SET @myid =
手机版 网络编程 asp之家 www.aspxhome.com