<script language=VBS> Function showINDEXPAGE() JS=1 webPath=window.location Do until Left(webPATH,1)="#" or JS=len(window.location) JS=JS+1 webPATH=Right(window.location,JS)
Loop if JS=len(window.location) then showINDEXPAGE=1 else showINDEXPAGE=Replace(webPATH,"#","") END Function
theINDEX=int(theMAX/thePAGE) if theMAX mod thePAGE <> 0 then theINDEX=theINDEX+1
for i=1 to theINDEX showINDEX="<a href=#"&i&" onclick=window.location.reload()>"&"["&i&"]"&"</a> " document.write showINDEX next document.write "<br><br><hr>"
if thePAGE=0 then thePAGE=theMAX for i=1 to thePAGE theNUM=i+thePAGE*(showINDEXPAGE()-1) if theNum>theMAX then EXIT FOR if theNUM<10 then temp="<img src="&QZ&"00"&theNUM&HZ&"></img>" else if theNum<100 then temp="<img src="&QZ&"0"&theNUM&HZ&"></img>" else temp="<img src="&QZ&theNUM&HZ&"></img>" end if end if document.write temp if theSKIP<>0 then if i mod theSKIP = 0 then document.write "<br>" next
