您现在的位置: Gufang > 博客 > 学无止境 > 正文
ASP页面中插入随机文字或者代码
str=rs("content")
'这里str在为要实现插入随机文字或者代码的地方
dim a(5)
randomize 
t=int(rnd*5) 
a(0)="<font color='#FFFFFF'>qwqk.cn</font> </p>"
a(1)="<font color='#FFFFFF'>www.qwqk.cn</font> </p>"
a(2)="<font color='#FFFFFF'>权威期刊网qwqk.cn</font> </p>"
a(3)="<font color='#FFFFFF'>权威qwqk.cn期刊</font> </p>"
a(4)="<font color='#FFFFFF'>qwqk.cn 论文发表</font> </p>"
'这些随机干扰代码在实际使用时,为了修改方便,可以保存在数据库中,使用时直接调用
str=replace(str,"</p>",a(t))
response.write str

OK了。
这样的结果是,如果一篇文章中有3个</p>,那么这三个</p>会被替换为随机的一个相同随机码。
如果想实现不同的</p>被替换成不一样的随机码,则可以
str2=split(str,"</p>")
for i=0 to ubound(str2)
t=int(rnd*5)
str3=str3&str2(i)&a(t)&"</p>"  
next
response.write str3

发表评论(0)
姓名 *
电子邮件
QQ
评论内容 *
验证问题 * 江苏省的省会是哪个城市?请填写正确答案
验证码 * 图片看不清?点击重新得到验证码