分页一
*/
function showpage(url)
dim ii,n
if totalnumber mod maxperpage=0 then
n= totalnumber maxperpage
else
n= totalnumber maxperpage+1
end if
response.write ""& vbcrlf
end function
//分页函数二
function showpagee(url)
dim ii,n
if totalnumber mod maxperpage=0 then
n= totalnumber maxperpage
else
n= totalnumber maxperpage+1
end if
response.write ""& vbcrlf
end function