asp文章中随机插入网站版权文字的实现代码分享
发布时间：2023-05-27 14:00:13 所属栏目：教程 来源：
导读：网站不断被人抄袭采集，在百度对采集网站还没有有效的打击下，我们不能指望百度可以识别这些采集网站，那么只能依靠我们自己给我们辛辛苦苦做的内容加上版权文字，以打击这种不劳而获的采集行为。
当然，如果你的
当然，如果你的
|
网站不断被人抄袭采集，在百度对采集网站还没有有效的打击下，我们不能指望百度可以识别这些采集网站，那么只能依靠我们自己给我们辛辛苦苦做的内容加上版权文字，以打击这种不劳而获的采集行为。 当然，如果你的网站文章中有图片，那么请记得一定要打上自己的LOGO，而且这个LOGO不要固定在这些图片的某个角落里，一定要随机出现在图片的任意位置，做到神出鬼没，让采集者感慨：对方网站站标真是变幻莫测，防不胜防啊…… 切入正题。我们怎么才能在自己的文章中随机插入版权文字呢？昨晚花了点时间，写了段简单的随机插入随机的文字的代码，asp版本的： ''===随机生成干扰文字函数开始=== ''===随机生成干扰文字函数一=== function rndk() dim s,s1,n,n1 ''随机插入你的网站版权文字，多个以|分割 s="脚本之家|脚本:http://www.cuoxin.com。|http://www.cuoxin.com。|Jb51．net。|<font style=display:none>http://www.kanshule.com</font>|<span display:none""><a href=http://www.cuoxin.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)，分割关键字改成它就可以了。 我们网站的内容虽然不能说百分百是原创，但也是我们一篇篇辛辛苦苦地整理出来的啊，别人通过程序几个小时就能把你几个月甚至几年的心血就偷窃过去了，放到谁身上也不舒心啊。 所以，飘易放出这样的随机插入版权的代码，希望能遏制部分这些采集者的嚣张气焰。 （编辑：聊城站长网） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |
站长推荐
