InArray Function:

The InArray  function checks for the existence of the string passed in the array collection.  Returns True if the string value or exists and False if it does not exist.

Syntax:
boolean = InArray(theValue)
Example Usage:
<% 
theValue = string
InArray(theValue) %>
ASP Source Code:
Function InArray(strValue)
	Dim i
	For i = 0 to UBound([arrayname])
		If selCriteria(i,1) = cstr(strValue) Then
			InArray = TRUE
			Exit Function
		End If
	Next
	InArray = FALSE 
End Function