asp中限制某些字符留言评论
来源:
中文源码网 浏览:155 次 日期:2024-05-18 22:53:18
【下载文档: asp中限制某些字符留言评论.txt 】
ASP中限制某些字符留言评论
Sub CheckCanSubmit(str)
Dim connt,connts
connt="六合彩,免费电影,安利,http,www,
connts = split(connt,",")
For each glword in connts
if instr(str,glword)<>0 then
Response.Write("")
Response.End()
end if
next
End Sub