[php] <% dim sql_leach,sql_leach_0,Sql_DATA,SQL_Get,Sql_Post sql_leach = "',and,exec,insert,select,delete,update,count,*,%,chr,mid,master,truncate,char,declare" sql_leach_0 = split(sql_leach,",") If Request.QueryString<>"" Then For Each SQL_Get In Request.QueryString For SQL_Data=0 To Ubound(sql_leach_0) if instr(Request.QueryString(SQL_Get),sql_leach_0(Sql_DATA))>0 Then Response.Write "請不要嘗試進行SQL注入！" Response.end end if next Next End If If Request.Form<>"" Then For Each Sql_Post In Request.Form For SQL_Data=0 To Ubound(sql_leach_0) if instr(Request.Form(Sql_Post),sql_leach_0(Sql_DATA))>0 Then Response.Write "請不要嘗試進行SQL注入！" Response.end end if next next end if %> [/php] 防止暴庫的辦法，在數(shù)據(jù)庫文件前面加上On Error Resume Next [php] <% On Error Resume Next dim conn,connstr,db %> [/php] 本文來自CSDN博客，轉(zhuǎn)載請標明出處：http://blog.csdn.net/wjq3714/archive/2009/05/17/4195793.aspx