|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
ASP一般认为只能运行在IIS上,正如前面所提到的,这并不是十分正确,事实上,ASP也能运行在Apache上。ApacheASP可在任意Apache服务器上运行有限的ASP功能,所需做的,只需打开mod_perl。分页|函数constMaxPerPage=18
dimpage
ifnotrequest("page")=""then
Page=cint(request("page"))
else
Page=1
endif
dimi
i=0
rs.move(Page-1)*MaxPerPage
分页
dowhile
两头是轮回段
i=i+1
ifi>=MaxPerPagethenexitdo
rs.movenext
loop
===========================
totalnumber=纪录总数
maxperpage=每页纪录数
filename=分页的文件名
<%
functionshowpage(totalnumber,maxperpage,filename)
dimn
iftotalnumbermodmaxperpage=0then
n=totalnumbermaxperpage
else
n=totalnumbermaxperpage+1
endif
response.write"<formmethod=Postaction="&filename&">"
response.write"<palign=center><fontcolor=#000080>>>分页</font>"
ifpage<2then
response.write"<fontcolor=#000080>首页上一页</font>"
else
response.write"<ahref="&filename&"?page=1&>首页</a>"
response.write"<ahref="&filename&"?page="&page-1&">上一页</a>"
endif
ifn-page<1then
response.write"<fontcolor=#000080>下一页尾页</font>"
else
response.write"<ahref="&filename&"?page="&(page+1)
response.write">下一页</a><ahref="&filename&"?page="&n&">尾页</a>"
endif
response.write"<fontcolor=#000080>页次:</font><strong><fontcolor=red>"&page&"</font><fontcolor=#000080>/"&n&"</strong>页</font>"
response.write"<fontcolor=#000080>共<b>"&totalnumber&"</b>笔记录<b>"&maxperpage&"</b>笔记录/页</font>"
response.write"<fontcolor=#000080>转到:</font><inputtype=textname=pagesize=4value="&page&">"
response.write"<inputtype=submitname=Submitvalue=go></span></p>"
endfunction
%>
楼上说交互性不好,太牵强了吧。在微软提供的一套框架中,利用asp做网站,开发效率高,使用人数少,减少不必要的开销。交互性是互动方式,是有开发人员决定的。 |
|