<< ") end if if not RSPrevPage = 0 then response.write("< ") end if for P = start to Next10 if not P = CurrPage then response.write("" & P & " ") else response.write(" " & P & " ") end if Next if not RSNextPage > pageRS.PageCount then response.write("> ") end if if not Next10 = pageRS.PageCount then response.write(" >>") end if end if Response.Write "
" pageRS.Close Set pageRS = Nothing End If ' End If/Then/Else statement after number of records test End If ' End searchTerm check If/Then/Else statement %>