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

ASP
asp实现取得数组中的最大值的代码
asp 将日期格式化为需要的格式
asp 下产生任意位数随机密码的代码
asp下返回以千分位显示数字格式化的数值
asp重定向页面的方法总结
asp下去除数组中重复的项的方法
asp下实现 重新排序数字数组的代码
asp 验证输入网址是否有效并可以访问 与正则验证输入网址
asp验证Ip格式的函数
asp实现生成由数字,大写字母,小写字母指定位数的随机数
asp 格式化sql中的like字符串
asp 实现显示所有的服务器变量值的函数
asp 取得用户真实IP,对代理地址仍然有效的函数
asp 通用数据库连接过程函数
asp 字符串截取函数
asp下实现格式化文件大小以MB显示的函数
asp 下用正则表达式检测邮箱格式的函数
asp 实现检测字符串是否为纯字母和数字组合的函数
asp代码实现检测组件是否安装的函数
asp通过JMAIL实现通用发送函数

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


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 56 ::
收藏到网摘: 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),分割关键字改成它就可以了。
我们网站的内容虽然不能说百分百是原创,但也是我们一篇篇辛辛苦苦地整理出来的啊,别人通过程序几个小时就能把你几个月甚至几年的心血就偷窃过去了,放到谁身上也不舒心啊。
所以,飘易放出这样的随机插入版权的代码,希望能遏制部分这些采集者的嚣张气焰。
如果你有更好的方法,欢迎留下您的评论。