|
||
<%
TM_counter = 0
For i = 1 to rsDatas_total Step MM_size
TM_counter = TM_counter + 1
TM_PageEndCount = i + MM_size - 1
if TM_PageEndCount > rsDatas_total Then TM_PageEndCount = rsDatas_total
if i <> MM_offset + 1 then
Response.Write("")
Response.Write(TM_counter & "")
else
Response.Write("Page " & TM_counter & "")
End if
if(TM_PageEndCount <> rsDatas_total) then Response.Write(" : ")
next
%>
|
||