万能asp防注代码

万能asp防注代码

这几天着实为sql注入漏洞伤了神,网上的代码好多不是很深奥就是麻烦

终于找到了万能防注代码,分享了,呵呵

操作简单上手,只要来个包含或放入conn.asp中,搞定

末了,估计还有一些危险字符没有放全,帮我补全一下,谢谢了

%

''--------定义部份------------------

Dim Fy_Post,Fy_Get,Fy_In,Fy_Inf,Fy_Xh,Fy_db,Fy_dbstr

''自定义需要过滤的字串,用 防 分隔

Fy_In = ''防;防and防exec防insert防select防delete防update防count防防%防chr防mid防master防truncate防char防declare防防防=防防-防_

Fy_Inf = split(Fy_In,防)

If Request.Form Then

For Each Fy_Post In Request.Form

For Fy_Xh=0 To Ubound(Fy_Inf)

If Instr(LCase(Request.Form(Fy_Post)),Fy_Inf(Fy_Xh))0 Then

Response.Write Script Language=JavaScriptalert(''网长友情提示黑客大侠↓

请不要在参数中包含非法字符尝试注入攻击本站,本站做起来很不容易的.俺是菜鸟,好怕怕,放俺一马吧！

httpwww.ohttp.com

QQ100020304

有话好话,请到httpwww.pkgo.netmessage给俺留言'');Script

Response.Write 非法操作！本站已经给大侠您做了如下记录↓br

Response.Write 操作ＩＰ：&Request.ServerVariables(REMOTE_ADDR)&br