dim getflag,errorsql,requestkey,fori[br]errorsql = "過濾字符||過濾字符" [br]errorsql = split(errorsql,"||")[br]if request.servervariables("request_method")="get" then '取得表單提交的方式！[br]　getflag=true[br]else[br]　getflag=false[br]end if[br]if getflag then[br]　for each requestkey in request.querystring '這個主要從提交的參數(shù)里面循環(huán)進行判斷[br]　　for fori=0 to ubound(errorsql)[br]　　　if instr(lcase(request.querystring(requestkey)),errorsql(fori))<>0 then[br]　　　　 showmsg "警 告!","禁止在本站發(fā)布垃圾信息!
返回","erroricon",""[br]　　　end if[br]　　next[br]　next [br]else[br]　for each requestkey in request.form[br]　　for fori=0 to ubound(errorsql)[br]　　　if instr(lcase(request.form(requestkey)),errorsql(fori))<>0 then[br]　　　　 showmsg "警 告!","禁止在本站發(fā)布垃圾信息!
返回","erroricon",""[br]　　　end if[br]　　next[br]　next[br]end if[br][br]其實原理都很簡單,大家自己看看吧！