手机
当前位置:查字典教程网 >编程开发 >ASP教程 >asp文章中随机插入网站版权文字的实现代码
asp文章中随机插入网站版权文字的实现代码
摘要:当然,如果你的网站文章中有图片,那么请记得一定要打上自己的LOGO,而且这个LOGO不要固定在这些图片的某个角落里,一定要随机出现在图片的任...

当然,如果你的网站文章中有图片,那么请记得一定要打上自己的LOGO,而且这个LOGO不要固定在这些图片的某个角落里,一定要随机出现在图片的任意位置,做到神出鬼没,让采集者感慨:对方网站站标真是变幻莫测,防不胜防啊……

切入正题。我们怎么才能在自己的文章中随机插入版权文字呢?昨晚花了点时间,写了段简单的随机插入随机的文字的代码,asp版本的:

''===随机生成干扰文字函数开始===

''===随机生成干扰文字函数一===

functionrndk()

dims,s1,n,n1

''随机插入你的网站版权文字,多个以|分割

s="查字典教程网|脚本:http://www.jb51.net。|http://www.jb51.net。|Jb51.net。|<fontstyle=display:none>http://www.kanshule.com</font>|<spanstyle=""display:none""><ahref=http://www.jb51.net>脚本</a></span>"

s1=split(s,"|")

Randomize

n=Int((ubound(s1)-lbound(s1)+1)*Rnd+lbound(s1))

Randomize

n1=Int((10-1+1)*Rnd+1)

ifn1<=3then'30%概率出现

rndk=s1(n)

else

rndk=""

endif

endfunction

''===随机生成干扰文字函数二===

functiontranstr(str)'调用该函数转化

dimstr1,i,k

k="<p></p>"'分割关键字

str1=split(str,k)

fori=lbound(str1)toubound(str1)

transtr=transtr&str1(i)&rndk()&k

next

endfunction

''===随机生成干扰文字函数结束===

在具体调用的时候,比如我们的内容字段content,用上面的函数转换一下就ok了,像transtr(content)这样就行了。我这里取的分割关键字是段落结束之前的<p></p>,你也可以改成其他如<br>换行等,如果你的字段没有经过UBB转化,那么换行回车符号为CHR(10)&CHR(10),分割关键字改成它就可以了。

我们网站的内容虽然不能说百分百是原创,但也是我们一篇篇辛辛苦苦地整理出来的啊,别人通过程序几个小时就能把你几个月甚至几年的心血就偷窃过去了,放到谁身上也不舒心啊。

所以,飘易放出这样的随机插入版权的代码,希望能遏制部分这些采集者的嚣张气焰。

如果你有更好的方法,欢迎留下您的评论。

【asp文章中随机插入网站版权文字的实现代码】相关文章:

asp中COM组件中如何连接数据库的代码

asp 中英文字符长度检测判断函数

ASP读取IIS日志的小程序代码

asp实现批量录入数据的实现

防止网站内容被小偷采集的ASP代码

很不错的一个UBB代码

在ASP中用组件检测当前网卡地址的代码

asp 特殊字符屏蔽代码

asp防止网页刷新代码

asp调用二级分类代码

精品推荐
分类导航