ASP中限制某些字符留言评论

Sub CheckCanSubmit(str) Dim connt,connts connt=六合彩,免费电影,安利,http,www,0 then Response.Write([removed]alert('操作非法');window.history.go(-1);[removed]) Response.End() end if next End Sub