我的留言本经常被人骚扰！！该如何处理 - ASP技术论坛

tiaoyuan

等　级：新手上路
帖　子：183
专家分：0
注　册：2006-8-30
结帖率：52.38%

楼主

问题点数：0 回复次数：2

我的留言本经常被人骚扰！！该如何处理

我的留言本常被人发表一些广告用语．每天都有，十分之有规律．．．如下列

[url=http://rmeng08.moslemblog.com/]六合彩[/url]
[url=http://rmeng08.blog.sr510.com/]六合彩中[/url]
[url=http://rmeng08.blogonfly.com/]六合彩[/url]
[url=http://rmeng08.noeblog.com/]六合彩中心[/url]
[url=http://rmeng08.partyblog.de/]六合彩[/url]
[url=http://rmeng08.multi-blogs.com/]六合彩中心网[/url]
[url=http://rmeng08.sharethepractice.org/]六合彩[/url]
[url=http://rmeng08.blogme.co.nz/]六合彩网[/url]
[url=http://beginlog.com/rmeng08/]六合彩[/url]
[url=http://rmeng08.blog-life.org/]六合彩中心[/url]
[url=http://rmeng08.zbloggy.com/]六合彩网[/url]

想问一下，对方是人工添加还是它们本身是用软件发表的．．．怎样防止这种事情发生．．??

[此贴子已经被作者于2006-10-10 16:35:16编辑过]

搜索更多相关主题的帖子: 留言本　骚扰　

2006-10-10 16:34

tiaoyuan

等　级：新手上路
帖　子：183
专家分：0
注　册：2006-8-30

第 3 楼

得分:0

function glvs(s)
dim bads,found,word
bads = "******,免费电影,junyuan,qn888,....."
bads = split (bads,",")
found = false
for each word in bads
if instr(s,word) then
found = true
exit for
end if
next
glvs = found
end function

if log_r_content="" then
response.write("不能提交空白的评论")
response.end
else
if glvs(log_r_content) then
'发现广告
end if
'............
'插入日志评论
'..............
end if

-----------------------------------------------------

word 这个是什么来的??

log_r_content 是内容名称...........加了代码．．没有任何反应．．．

2006-10-18 11:08