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

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

 来源:asp之家 发布时间:2011-04-15 11:11:00 

标签:asp,随机插入,网站版权

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

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

''===随机生成干扰文字函数开始=== 
''===随机生成干扰文字函数一=== 
function rndk() 
dim s,s1,n,n1 
''随机插入你的网站版权文字,多个以|分割 
s="词典网|脚本:http://www.cidianwang.com。|http://www.cidianwang.com。|cidianwang.com。|<font style=display:none>http://www.kanshule.com</font>|<span style=""display:none""><a href=http://www.cidianwang.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),分割关键字改成它就可以了。

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

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

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

0
投稿

猜你喜欢

  •    【代码示例】 [code=SQL] DELIMITER   $$ DROP   FU
  • asp按关键字查询XML的问题 '-------------------------------------------------
  • Web Forms 2.0 是一个很有意思的东东,是 HTML 5 的组成部分。它的目标是提升表单的使用性 (usability),基本上就
  • 这里的等价不是说function的toString相同,也不是说function的引用相同,而是说对于两个function A和B,如果它们
  • isnull在数据库查询中的应用,特别是再语句连接的时候需要用到 比如连接时候,某个字段没有值但是又要左连接到其他表上 就会显示空, isn
  • 这几天做了一个专题,放到服务器后发现从首页链接到专题页面正常,但是从专题页面跳转到首页就会出现乱码。很是蹊跷,专题页面和首页没有共同的文件,
  • 瞬间设计是什么?良好的用户体验,全在于那些完美的瞬间。在第一个瞬间,假设当一位用户从购物搜索结果页面跳转到某个店铺的时候,他此刻可能是想看看
  • 字体设计是人类商业活动的需求,它随着时代和科学技术的进步而不断地变化着。被广泛应用于网络生活的各个方面。现代字体设计在电脑技术的应用中已经深
  • 最近在做学院的选课系统时,在分页上被卡壳了一下,因为需要用到排序,所以不能像以前一样用一个自动递增的字段作为主键,然后仅仅是对这个主键来做统
  • 很久之前就对jQuery.animate的实现非常感兴趣,不过前段时间很忙,直到前几天端午假期才有时间去研究。jQuery.animate的
  • Microsoft? SQL Server? 2000 提供了两种主要机制来强制业务规则和数据完整性:约束和触发器。触发器是一种特殊类型的存
  •  代码如下:SELECT * FROM Orders WHERE OrderGUID IN('BC71D821-9E25-
  • 兼容主流浏览器,独立样式表,可以很方便的进行视觉效果自定义截图:模拟下拉菜单演示代码:<!DOCTYPE html PUBLIC &q
  • Conditional-CSS允许你针对单一浏览器或浏览器组写出有逻辑条件的可维护的特定的CSS声明。使CSS针对特定的浏览器。简化你对CS
  • asp中我们可以利用ERR对象来判断sql语句执行是否成功:SQL="Insert INTO TABLE(F1,F2) value
  • 记得很早以前看到过这样的一段介绍:想象你在逛街边的一家书店,如果最终你没有购买任何图书就直接离开了,店长并不会知道你来过。但是如果你买了书,
  • 数据库查询优化的实用技巧:本文中,abigale代表查询字符串,ada代表数据表名,alice代表字段名。技巧一:问题类型:ACCESS数据
  • 著名的老掉牙的IE6.0在我这里已经有六年工龄了,前几天朋友拿到个IE8.0新的Beta版本,我的Sever2003装不上,大为扫兴。Chr
  • 1、动态sql, 即动态参数:在存储过程中,想要直接用表名变量做参数,动态执行sql,不能直接写<P>create proced
  • 一.权限表mysql数据库中的3个权限表:user 、db、 host权限表的存取过程是:1)先从user表中的host、 user、 pa
手机版 网络编程 asp之家 www.aspxhome.com