一个asp函数，解决SQLInjection漏洞

函数很简单， 主要是针对字符串和数字两种类型的传入数据分别进行了处理，具体用法： c#N4XsG,  
"#O9ij  
字符类型的 d&NnpjH}c  
strUsername = CheckInput(Request(“username“),“s“) ynIC (t  
数字类型的 Q ]CMm2L^f  
ID = CheckInput(Request(“id“),“i“) @njNP^'Kx  
:8)Jnh\5  
下面是函数 'v]0;~\mp>  
$NVVurXa  
YcobK#c  
Function CheckInput(str,strType) .|O T#"LP  
  函数功能：过滤字符参数中的单引号，对于数字参数进行判断，如果不是数值类型，则赋值0 /qIQE&V-  
  参数意义： str     ---- 要过滤的参数 |_TiF;^  
            strType ---- 参数类型，分为字符型和数字型，字符型为s，数字型为i > ubq{'  
Dim strTmp eC!=4_lx)  
strTmp   = q%4X1 W  
If strType =s Then S oeoUI]m  
strTmp = Replace(Trim(str),,) i&:SWH=  
ElseIf strType=i Then x []ad"R  
If isNumeric(str)=False Then str=0 "'z}oS  
strTmp = str Fe0M2%e;|  
Else *-9i<@|(U^  
strTmp = str wG,"X'1  
End If MR1I"gqE}I  
CheckInput = strTmp |E1U$,s~u  
End Function `}?;Ow&2CY  
QOXo(S  
0 %~~IT}U  
jB?SX  
转自： ASP教程采集

strTmp = Replace(Trim(str),,) ]<^2B?}  
单引号捏? f5V-;  
v])ew|  
鉴定完毕.