asp用什么函数对比下是否有这个数字？ - 编程论坛

#2

yms1232009-12-24 14:39

办法一使用Split函数来循环判断。
Dim isHave,i,Str,Ary()
Str="01,02,03,04,05,06"
Ary=Split(Str,",")
isHave=False
For i=0 To UBound(Ary)
    IF "03"="Ary(i)" Then
       isHave=True
    End IF
Next
If isHave Then
   Response.Write "03存在"
Else
   Response.Write "03不存在"
End IF
办法二，使用InStr函数当作字符串来判断
Dim Str
Str="01,02,03,04,05,06"
IF InStr(Str,"03")<>0 Then
   Response.Write "03存在"
Else
   Response.Write "03不存在"
End IF

#3

35maoe2009-12-24 14:42

我目前用的是办法二，省事，但有01，02，11，12 查11时

IF InStr(Str,"11")<>0 Then
Response.Write "11存在"
Else
Response.Write "11不存在"
End IF

但提示01也会出来

#4

35maoe2009-12-24 15:59

已解决，谢谢yms123版主//

#5

anlige2009-12-24 19:17

为了精确，最好用数组