主页 > 知识库 > asp文章中随机插入网站版权文字的实现代码

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

热门标签:地图标注还可以做吗 高质量的电销外呼系统 滴滴地图标注上车点 无营业执照地图标注教学 硅基电话机器人加盟 宿州防封外呼系统平台 友邦互联电销机器人违法吗 电销机器人采购 外呼系统怎么话费
当然,如果你的网站文章中有图片,那么请记得一定要打上自己的LOGO,而且这个LOGO不要固定在这些图片的某个角落里,一定要随机出现在图片的任意位置,做到神出鬼没,让采集者感慨:对方网站站标真是变幻莫测,防不胜防啊……

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


''===随机生成干扰文字函数开始===
''===随机生成干扰文字函数一===
function rndk()
dim s,s1,n,n1
''随机插入你的网站版权文字,多个以|分割
s="脚本之家|脚本:https://www.jb51.net。|https://www.jb51.net。|Jb51.net。|font style=display:none>http://www.kanshule.com/font>|span style=""display:none"">a href=https://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)
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=transtrstr1(i)rndk()k
next
end function
''===随机生成干扰文字函数结束===

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

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

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

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

标签:宣城 儋州 广元 雅安 锡林郭勒盟 江门 新余 七台河

巨人网络通讯声明:本文标题《asp文章中随机插入网站版权文字的实现代码》,本文关键词  asp,文章,中,随机,插入,网站,;如发现本文内容存在版权问题,烦请提供相关信息告之我们,我们将及时沟通与处理。本站内容系统采集于网络,涉及言论、版权与本站无关。
  • 相关文章
  • 下面列出与本文章《asp文章中随机插入网站版权文字的实现代码》相关的同类信息!
  • 本页收集关于asp文章中随机插入网站版权文字的实现代码的相关信息资讯供网民参考!
  • 企业400电话

    智能AI客服机器人
    15000

    在线订购

    合计11份范本:公司章程+合伙协议+出资协议+合作协议+股权转让协议+增资扩股协议+股权激励+股东会决议+董事会决议

    推荐文章