一个asp函数，解决SQLInjection漏洞

函数很简单， 主要是针对字符串和数字两种类型的传入数据分别进行了处理，具体用法： $ly#zQ
R  
$~w@0Yl  
字符类型的 34+)-\xt:  
strUsername = CheckInput(Request(“username“),“s“) VrnK)za*H  
数字类型的 )$9C`d[  
ID = CheckInput(Request(“id“),“i“) ecSdU>  
.Y^d
9.  
下面是函数 .NNcc4+  
HiS,q0  
FJn~ =hA  
Function CheckInput(str,strType) Sug~FV?k$e  
  函数功能：过滤字符参数中的单引号，对于数字参数进行判断，如果不是数值类型，则赋值0 8zWBXV  
  参数意义： str     ---- 要过滤的参数 ?C#F?N0  
            strType ---- 参数类型，分为字符型和数字型，字符型为s，数字型为i cW~6@&
zp  
Dim strTmp ]$?zT`>(F  
strTmp   = m"?'hR2  
If strType =s Then ||
*&g2Y  
strTmp = Replace(Trim(str),,) A^= Hu,"
e  
ElseIf strType=i Then U:pLnNp`  
If isNumeric(str)=False Then str=0 fRv S@  
strTmp = str :) Fp B"  
Else YQB]t=Ha  
strTmp = str QJ(e*/  
End If YfrTvKX  
CheckInput = strTmp [X$|dOm'N  
End Function 1=/MT#d^?  
5w,YBUp  
w7`@=kVx  
p)[BB6E  
转自： ASP教程采集

strTmp = Replace(Trim(str),,) &]"_pc/>m  
单引号捏? !w;A=  
v#<+
n{B  
鉴定完毕.