我想要这种代码，我知道方法却不知实现

[hnusr]

有一些产品文件。product1.asp...product10.asp
其实这些都是静态的文件，只是为了利用include 这个语句简化一些操作才改成asp的，现在是，我想把那个 首页　上一页　下一页　尾页　　这个也做成一个单独的文件，怎么实现每页的超连接跳转呢？我知道可以这样，取得product1.asp中的1，这是第一页，依此类推。可是我真的不记得那些代码了。请大家帮忙写一下。

[liuqinyi]

[ <% dim newurl
dim requestedQueryStr
requestedQueryStr=request.ServerVariables("QUERY_STRING")
if instr(requestedQueryStr,"&Page=") then '如果已经有?Page 重新置为?Page

requestedQueryStr="?"&left(requestedQueryStr,instr(requestedQueryStr,"&Page")-1) & "&Page=" '
elseif instr(requestedQueryStr,"Page") then '如果已经有&Page

requestedQueryStr="?Page="
elseif requestedQueryStr="" then

requestedQueryStr="?Page="
elseif requestedQueryStr<>"" then
requestedQueryStr="?"&requestedQueryStr&"&Page="

end if
newurl="http://" & request.ServerVariables("HTTP_HOST")&Request.ServerVariables("URL")&requestedQueryStr
newurl=server.HTMLEncode(newurl)
for i=1 to Page_Count
if i=cint(CPage) then
response.Write "<a href=""" & newurl & cstr(i)&"""><font color=""#FF0000"">" & cstr(i) &"</font></a>" & " "
else
response.Write "<a href=""" & newurl & cstr(i)&""">" & cstr(i) &"</a>" & " "
end if
next
%>]
另存为一个asp文件，包含到你需要分页的就可以了