div.pagenums{color:#fff;float:left;width:100%;margin:15px auto;padding:10px 0;text-align:center;}
div.pagenums a.ectlink{margin:35px 0;padding:5px 10px;line-height:40px;white-space:nowrap;color:#1a7cb7;border:1px solid #1a7cb7;border-radius:4px;font-size:14px;-webkit-box-shadow:0 2px 4px #c0c0c0;-moz-box-shadow:0 2px 4px #c0c0c0;box-shadow:0 2px 4px #c0c0c0;}
div.pagenums a.ectlink:hover{color:#e71b1f;border:1px solid #e71b1f;-webkit-box-shadow:inset 0 2px 4px #ccc;-moz-box-shadow:inset 0 2px 4px #ccc;box-shadow:inset 0 2px 4px #ccc;}
div.pagenums .currpage{color:#000;margin:5px;padding:5px 10px;border:1px solid #29425A;-moz-border-radius:6px;-webkit-border-radius:6px;-ms-border-radius:6px;-o-border-radius:6px;border-radius:6px;background-color:#ccc;cursor:no-drop;}

function writepagebar(CurPage,iNumPages,sprev,snext,sLink,nofirstpage)
Dim i, sStr, startPage, endPage
startPage=vrmax(1,int(cdbl(CurPage)/10.0)*10)
endPage=vrmin(iNumPages,(int(cdbl(CurPage)/10.0)*10)+10)
if CurPage > 1 then
sStr=sLink & "1""><span class=""pagebarquo"" style=""font-family:Verdana;font-weight:bold"">«</span></a> " & sLink & CurPage-1 & """"&IIfVs(CurPage>2," rel=""prev""")&">"&sprev&"</a> | "
else
sStr="<span class=""pagebarquo"" style=""font-family:Verdana;font-weight:bold"">«</span> "&sprev&" | "
end if
for i=startPage to endPage
if i=CurPage then
sStr=sStr & "<span class=""currpage"">" & i & "</span> | "
else
sStr=sStr & sLink & i & """>"
if i=startPage AND i > 1 then sStr=sStr&"..."
sStr=sStr & i
if i=endPage AND i < iNumPages then sStr=sStr&"..."
sStr=sStr & "</a> | "
end if
next
if CurPage < iNumPages then
writepagebar=sStr & sLink & CurPage+1 & """ rel=""next"">"&snext&"</a> " & sLink & iNumPages & """><span class=""pagebarquo"" style=""font-family:Verdana;font-weight:bold"">»</span></a>"
else
writepagebar=sStr & " "&snext&" <span class=""pagebarquo"" style=""font-family:Verdana;font-weight:bold"">»</span>"
end if
if nofirstpage then writepagebar=replace(replace(writepagebar,"&pg=1""",""" rel=""start"""),"?pg=1""",""" rel=""start""")
end function