|
蓝森林 http://www.lslnet.com 2006年8月25日 8:28
求救!!有没有对落日整站很熟的啊!!!我分页出错!!
有没有对落日整站很熟的啊!!!我分页出错!!
看看 这个!!!第一页显全部,而不是前面10个!!但是后面又还有几页!!
http://www.yuan0.com/lin/down.asp
down.asp的代码
<!--#include file="conn.asp"-->
<!--#include file="inc/format.asp"-->
<!--#include file="inc/error.asp"-->
<!--#include file="inc/inc.asp"-->
<!--#include file="inc/down_body.asp"-->
<%
stats="文件下载"
dim founderr,errmsg
founderr=false
errmsg=""
if request.querystring("cat_id")<>"" then
if not isInteger(request.querystring("cat_id")) then
founderr=true
errmsg=errmsg+"<br>"+"<li>非法的文件分类参数。"
end if
end if
if request.querystring("class_id")<>"" then
if not isInteger(request.querystring("class_id")) then
founderr=true
errmsg=errmsg+"<br>"+"<li>非法的文件分类参数。"
end if
end if
if request("page")<>"" then
if not isInteger(request("page")) then
founderr=true
errmsg=errmsg+"<br>"+"<li>非法的文件分页参数。"
end if
end if
if request("keyword")<>"" then
if instr(request("keyword"),"'")>0 then
founderr=true
errmsg=errmsg+"<br>"+"<li>非法的文件搜索参数。"
end if
end if
if founderr then
call diserror()
response.end
else
call head()
call menu()
call down_body()
call footer()
end if
%> |
|