<%
' Calculate the range of items to enumerate, assuming' results, from and count are passed in.' Calculate ranges
rangeFrom = from
rangeTo = from + count - 1
if rangeTo > results.Length then rangeTo = results.Length
' Enumeratefor i = rangeFrom to rangeTo
set document = results.Item(i)
' Do any required processing on document objectnext%>