asp文章干扰码实现方式
优采云 发布时间: 2020-08-09 13:03也许你会问为何网站要那么做呢?原因不呼入两种:一是为了避免复制或采集,你想想文章中多了这么多的干扰码,如果你复制或采集了必须自动一个个的删掉,给采集器降低了一定的工作量,一般会吓坏她们。二是可以宣传网站,因为干扰码中可以是自己网站的相关信息,如网址等,当他人复制或采集了那些文章,如果不做任何处理的话,访客都会这个网站看到其它网站的信息了。无形中为这个网站做了宣传。
asp实现在文章中添加干扰码的方式虽然不是很复杂,只要将打算好的干扰文字插入到文章中即可。这里涉及到三个问题:
1.如何形成干扰码,前面早已将了干扰码通常有两种,对于随机无意义的字符,我们只要用程序生成一段随机的字符就可以了,如何生成随机字符?请看:8个asp生成随机字符的函数 。对于有特定含义的字符或许也很简单,将特定的某一字符或某一组字符存入字符,在随机抽取插入,在之后会给出具体方式。
2.如何将干扰码插入文章中。对于这个问题,一般的做发是将干扰码放在换行或回车以后及
或
,另一种方式是随机的在文章中放置,此时必须用style="display:none"样式将其隐藏。
3.如何不影响正常访客的浏览。一般使用干扰码的文章都有一个背景色,只要把干扰码的文字颜色设置成于文章背景色一致就可以达到隐藏干扰码的目的了,呵呵。
下面给出干扰码具体使用的asp代码事例:
下面就要将Arndcode插入文章的内容中,使用了replace来替换
.这里只是插到了
后,对于
道理是一样的。
content=replace(content,"
","
"&Arndcode)
centent为文章的内容。这样就OK了。
function rndcode(byVal stars,byVal ends)
'by 点梦知识库 from:
dim rndlen,i
randomize
rndLen = int(stars*rnd+ends-stars)
for i = 1 to rndLen
randomize
rndcode = rndcode & chr(int(127*rnd+1))
next
end function
Arndcode=rndcode(20,100)
Arndcode = replace(Arndcode,"
Arndcode = replace(Arndcode,">","")
'下面设置干扰码的款式,只要做到和背景色一致就可以了
Arndcode = "" & Arndcode & ""