<% For Cont = 1 to objRS.PageSize %>
<% %>
<% objRS.MoveNext If objRS.Eof then Exit For Next Set Cont = Nothing %>
