当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp文章中随机插入网站版权文字的实现代码

ASP
asp分页(自己整理的2个分页程序)
ASP常用的系统配置函数
雨哲防采集策略之列表篇
雨哲浅谈关于防采集而不影响收录内容篇
asp数据库连接函数
ajax XMLHTTP Post Form时的表单乱码综合解决
ASP注入详细命令40条
用ASP实现MSSQL用户密码破解
ASP创建对象的两种方法比较
ASP字符串转换为整形、双精度型、布尔
ASP计算str2在str1中出现的次数
asp采集抓取网上房产信息的代码
ASP注册登陆实例代码
ASP中使用FileSystemObject时提高性能的方法
分享一个好东东,动态Include文件 (Dynamic File Includes)
解决 JScript 中使用日期类型数据时出现类型错误的问题
在ASP里面创建GUID
在JScript中使用缓存技术的实际代码
ASP javascript Application对象的Contents和StaticObjects做Cache的一些经验
海阳2006+功能中的潜水王

ASP 中的 asp文章中随机插入网站版权文字的实现代码


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 37 ::
收藏到网摘: n/a

网站不断被人抄袭采集,在百度对采集网站还没有有效的打击下,我们不能指望百度可以识别这些采集网站,那么只能依靠我们自己给我们辛辛苦苦做的内容加上版权文字,以打击这种不劳而获的采集行为。 当然,如果你的网站文章中有图片,那么请记得一定要打上自己的LOGO,而且这个LOGO不要固定在这些图片的某个角落里,一定要随机出现在图片的任意位置,做到神出鬼没,让采集者感慨:对方网站站标真是变幻莫测,防不胜防啊……
切入正题。我们怎么才能在自己的文章中随机插入版权文字呢?昨晚花了点时间,写了段简单的随机插入随机的文字的代码,asp版本的:

''===随机生成干扰文字函数开始===
''===随机生成干扰文字函数一===
function rndk()
dim s,s1,n,n1
''随机插入你的网站版权文字,多个以|分割
s="软晨学习网|脚本:http://www.ruanchen.com。|http://www.ruanchen.com。|Jb51.net。|<font style=display:none>http://www.kanshule.com</font>|<span style=""display:none""><a href=http://www.ruanchen.com>脚本</a></span>"
s1=split(s,"|")
Randomize
n=Int((ubound(s1) - lbound(s1) + 1) * Rnd + lbound(s1))
Randomize
n1=Int((10 - 1 + 1) * Rnd + 1)
if n1<=3 then '30%概率出现
rndk=s1(n)
else
rndk=""
end if
end function
''===随机生成干扰文字函数二===
function transtr(str) '调用该函数转化
dim str1,i,k
k="<p></p>" '分割关键字
str1=split(str,k)
for i=lbound(str1) to ubound(str1)
transtr=transtr&str1(i)&rndk()&k
next
end function
''===随机生成干扰文字函数结束===
在具体调用的时候,比如我们的内容字段content,用上面的函数转换一下就ok了,像transtr(content)这样就行了。我这里取的分割关键字是段落结束之前的<p></p>,你也可以改成其他如<br>换行等,如果你的字段没有经过UBB转化,那么换行回车符号为 CHR(10) & CHR(10),分割关键字改成它就可以了。
我们网站的内容虽然不能说百分百是原创,但也是我们一篇篇辛辛苦苦地整理出来的啊,别人通过程序几个小时就能把你几个月甚至几年的心血就偷窃过去了,放到谁身上也不舒心啊。
所以,飘易放出这样的随机插入版权的代码,希望能遏制部分这些采集者的嚣张气焰。
如果你有更好的方法,欢迎留下您的评论。