一个asp函数，解决SQLInjection漏洞

函数很简单， 主要是针对字符串和数字两种类型的传入数据分别进行了处理，具体用法： +|x{?%
.O  
)~Gn7  
字符类型的 l3*GQ~m7  
strUsername = CheckInput(Request(“username“),“s“) :`4F0
 
数字类型的 ~MP |L?my  
ID = CheckInput(Request(“id“),“i“) artn _  
FUf.3@}  
下面是函数 ^ir)z@P?V  
sH>`eqY
 
=~"X/>'  
Function CheckInput(str,strType) F2\&rC4v  
  函数功能：过滤字符参数中的单引号，对于数字参数进行判断，如果不是数值类型，则赋值0 :T|9
;2  
  参数意义： str     ---- 要过滤的参数 6{{<+ o  
            strType ---- 参数类型，分为字符型和数字型，字符型为s，数字型为i ExQ\qp3  
Dim strTmp CiGXyhh  
strTmp   = C_'EO<w$  
If strType =s Then xHqF_10S#  
strTmp = Replace(Trim(str),,) B;S'l|-?  
ElseIf strType=i Then ( et W4p  
If isNumeric(str)=False Then str=0 93Zij<bH?e  
strTmp = str [2YPV\=  
Else 9^9-\DG  
strTmp = str ?68~g<d,  
End If ]Y-Y.&b7t  
CheckInput = strTmp & Zn`2%  
End Function AloL+eN@  
alB'l  
0w:
3/WO  
`qYii
c%  
转自： ASP教程采集

strTmp = Replace(Trim(str),,) wP*3Hx;S  
单引号捏? C #iZAR  
BW
vM~no  
鉴定完毕.