下面添加:
if Instr(rword,"")>0 then ...,Bullcn'Blog - 分享、交流、进步。" /> 过滤带广告链接的评论的修改 - Bullcn'Blog

过滤带广告链接的评论的修改


review.asp找到:
if rword="" then errs=errs&"+评论的内容不能为空!"

下面添加:
if Instr(rword,"</a>")>0 then
errs=errs&"+回复评论的内容包含连接!"
elseif Instr(rword,"[/url]")>0 then
errs=errs&"+回复评论的内容包含连接!"
end if

文章来自: Original
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志:
评论: 6 | 引用: 5 | 查看次数: 768
发表评论
昵 称:
密 码: 游客发言不需要密码.
内 容:
验证码: 验证码
选 项:
虽然发表评论不用注册,但是为了保护您的发言权,建议您注册帐号.
字数限制 20 字 | UBB代码 关闭 | [img]标签 关闭