函数很简单, 主要是针对字符串和数字两种类型的传入数据分别进行了处理,具体用法: 6tguy
Z]<_a)>
字符类型的 -wB AFr
strUsername = CheckInput(Request(“username“),“s“) s? Kn,6Y
数字类型的 ^> fs
ID = CheckInput(Request(“id“),“i“) O;2 u1p'iP
j$6}r
下面是函数 1oPT8)[U
nP^$p C
eAMT7 2_
Function CheckInput(str,strType) /
<p HDY
函数功能:过滤字符参数中的单引号,对于数字参数进行判断,如果不是数值类型,则赋值0 Bh?;\D'YC
参数意义: str ---- 要过滤的参数 $$a"A(Y
strType ---- 参数类型,分为字符型和数字型,字符型为s,数字型为i }kpkHq"`f
Dim strTmp (agdgy:#
strTmp = i weP3u##
If strType =s Then 2olim1
strTmp = Replace(Trim(str),,) /!hW6u5
ElseIf strType=i Then |wDCIHzQ
If isNumeric(str)=False Then str=0 q)*0G*
strTmp = str !r<7]nwV
Else 7F.,Xvw&@
strTmp = str J}JnJV8|G
End If (]:G"W8f
CheckInput = strTmp 5WUrRQ?E
End Function tz,FK;8
P]n
'q
x>^S..K}L%
SpgVsz
转自: ASP教程采集