函数很简单, 主要是针对字符串和数字两种类型的传入数据分别进行了处理,具体用法: 6x,=SW@4
|Umfq:W`y_
字符类型的 DB'KIw
strUsername = CheckInput(Request(“username“),“s“) x0$:"68PW
数字类型的 6ilC#yyp
ID = CheckInput(Request(“id“),“i“) ]J=)pDrk
/1#Q=T
下面是函数 L9?/ -@M
2X c
E(kb!Rz
Function CheckInput(str,strType) p<fgUVR
函数功能:过滤字符参数中的单引号,对于数字参数进行判断,如果不是数值类型,则赋值0 7"NJraQ6
参数意义: str ---- 要过滤的参数 :fKz^@mY4
strType ---- 参数类型,分为字符型和数字型,字符型为s,数字型为i Fd,+(i D
Dim strTmp q.sQ Z]ty9
strTmp = Bp{`%86SE
If strType =s Then 7+hF;
strTmp = Replace(Trim(str),,) ~w9=Fd6
ElseIf strType=i Then m&~Dj#%(w
If isNumeric(str)=False Then str=0 @mRrA#E#{
strTmp = str aa%&&
Else n9fA!Wic
strTmp = str fy>And*
End If bok 74U]
CheckInput = strTmp yP9wYF^A\
End Function Il`k]X M
UQ?OD~7
4FE@s0M,
8Y~=\(5>
转自: ASP教程采集