PHP里有in_array() 函数搜索数组中是否存在指定的值。ASP系统函数里不具备这个函数，今天青岛星网跟大家分享：ASP模仿PHP之InArray()函数的代码。
InArray的定义和用法
InArray()搜索数组中指定值并返回它的索引（如果没有找到则返回-1）
InArray的语法
InArray( value, array ) 'value 必需。规定要在数组搜索的值。 'array 必需。规定要搜索的数组。InArray（）的说明
如果给定的值 value 存在于数组 array 中则返回 它的索引。
如果没有在数组中找到参数，函数返回 -1。
Function InArray(elem, arr)
If IsArray(arr) then
dim i
For i = 0 to UBound(arr)
If arr(i) = elem Then
InArray = i
Exit Function
End If
Next
End if
InArray = -1
End Functiondim arr
arr = array("Peter", "Joe", "Glenn", "qdxw")
InArray("Peter",arr) '0
InArray("peter",arr) '-1
InArray("qdxw",arr) '3
InArray("Pester",arr) '-1
在线QQ：
