函数型显示翻页连接
这个程序将显示翻页连接功能单独抽出，而不涉及其它操作，可内置翻页效果，方便敏捷。
pagehanshu.asp
%’设置页码及URL
’value1 翻页地址
’value2 page的值
’value3 地址标签 eg:第一页、下一页
’value4 依据vaule1而定
’假如 value1 = "page.asp" 时，value4 = 1; value1 = "page.asp?id=1" 时，value4 = 0;
function page_url(value1,value2,value3,value4)
dim result
dim val
if value4 = 1 then
val = "?"
else
val = ""
end if
result = "" value3 ""
page_url = result
end function
’取得翻页的page参数 即为当前页
function page_request()
dim page
page = request("page")
if ( page "" and IsNumeric(page ...