Apparently there is no direct method to determine the length of an array in VBScript. The best way I could find is to use UBound(ArrayName). This will return the upper limit of the array. Unfortunately, it doesn’t account for empty items in the array. In the example below Length will be equal to 10, not 1.
Dim NewArray(10)
NewArray(0) = "Apple"
Length = UBound(NewArray) 'Length is equal to 10, not 1
Here is a good link to VBScript Array functions.
http://www.shocknet.org.uk/defpage.asp?pageID=30
If you know of a better way to determine the length, please let me know.