函数很简单， 主要是针对字符串和数字两种类型的传入数据分别进行了处理，具体用法： G ;f/Tch
~tOAT;g}q
字符类型的 E*?<KZe"
strUsername = CheckInput(Request(“username“),“s“) RZ1
/#;
数字类型的 Fu^ ^i&
ID = CheckInput(Request(“id“),“i“) t%530EB3
)P7)0 c
下面是函数 E9V 5$
_ gD
pKEaY
mrV! teP
Function CheckInput(str,strType) N?X^O# [
函数功能：过滤字符参数中的单引号，对于数字参数进行判断，如果不是数值类型，则赋值0 MLFKH
参数意义： str ---- 要过滤的参数 0(_l|PScF
strType ---- 参数类型，分为字符型和数字型，字符型为s，数字型为i 0@2mXO9f"
Dim strTmp !~Q2| r
strTmp = %%cHoprDa
If strType =s Then ={hX}"*D
strTmp = Replace(Trim(str),,) JoSJH35=:
ElseIf strType=i Then 9:I6( Zv0
If isNumeric(str)=False Then str=0 rpw.]vnn
strTmp = str $ "Bh]-
Else >AJSqgHQ,
strTmp = str QM?#{%31
End If Z@Ae$ '9H
CheckInput = strTmp h[Gg}N!
End Function b,KcBQ.
* !^<m0
M`6y@<
u !!X6<
转自： ASP教程采集
