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

Sub CheckCanSubmIT(str) Dim connt,connts connt="六合彩,免费电影,安利,http,www,a"  connts = split(connt,",")  For each glword in connts   if instr(str,glword)>
    0 then   Response.Write("script>
    alert('操作非法');
    window.history.go(-1);
    /script>
    ")  Response.End()  end if  next End Sub

声明：本文内容由网友自发贡献，本站不承担相应法律责任。对本内容有异议或投诉，请联系2913721942#qq.com核实处理，我们将尽快回复您，谢谢合作！