|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
ASP一般认为只能运行在IIS上,正如前面所提到的,这并不是十分正确,事实上,ASP也能运行在Apache上。ApacheASP可在任意Apache服务器上运行有限的ASP功能,所需做的,只需打开mod_perl。分页|显现<%
setcon=server.CreateObject("ADODB.Connection")
strConnection="DataSource=xxxxxxx;"
con.OpenstrConnection
setrs=Server.CreateObject("ADODB.Recordset")
chartSQL="selectID,name,category_onefromgoods"
rs.OpenchartSQL,con,1,3
ifrs.EOForrs.BOFthen假如为空
response.end
endif
pagesize=10每页显现10笔记录
pagecuont=rs.PageCount总页数
recordcount=rs.RecordCount
dimpagenum以后页码
dimcurrentRecord以后页的纪录数,关于末页其值不即是pagesize
ifRequest.QueryString("pageNum")=""then
pageNum=1
else
pageNum=Request.QueryString("pageNum")
rs.AbsolutePage=trim(Request.QueryString("pageNum"))
endif
%>
<html>
<head>
<metahttp-equiv="Content-Type"content="text/html;charset=gb2312">
<metaname="GENERATOR"content="MicrosoftFrontPage4.0">
<metaname="ProgId"content="FrontPage.Editor.Document">
<title>NewPage1</title>
<SCRIPTLANGUAGE=javascript>
<!--
functionopenwindow(url){
window.open(url,,resizable=no,width=240,height=160,fullscreen=yes)
}
//-->
</SCRIPT>
<linkrel="stylesheet"href="file:///F|/mysourceof17560/CSS.CSS"type="text/css">
</head>
<bodybgcolor=#999999>
<palign="center">商品修正页面</p>
<tableborder="1"width="100%"cellpadding="0"cellspacing="0"bordercolordark="#999999"bordercolorlight="#000000">
<tr>
<tdwidth="10%">
<divalign="center">编号 </div>
</td>
<tdwidth="63%">
<divalign="center">商品名 </div>
</td>
<tdwidth="14%">
<divalign="center">主分类</div>
</td>
<tdwidth="13%">
<divalign="center">操纵 </div>
</td>
</tr>
<%
fori=1tors.PageSize
ifrs.EOForrs.BOFthen本前提判别是不是到了止境
exitfor
endif
%>
<tr>
<tdwidth="10%"align=center><%=rs("ID")%></td>
<tdwidth="63%"align=center><%=rs("name")%> </td>
<tdwidth="14%"align=center><%=rs("category_one")%></td>
<tdwidth="13%">
<divalign="center">
<INPUTtype="button"value="Button"id=button1name=button1
ID")%>&zfenlei=<%=rs("category_one")%>,,resizable=no,width=240,height=160)">
</div>
</td>
</tr>
<%
currentRecord=currentRecord+1取确当前页的纪录数
rs.MoveNext
next
rs.Close
%>
</table>
<divalign="center"class="bfont">算计<%=recordCount%>笔记录|第
<%
pageNum_record=(pageNum-1)*pageSize+1初始纪录地位
pageNum_record_=pageNum_record+currentRecord-1末纪录地位
Response.WritepageNum_record
%>
-<%=pageNum_record_%>条|第<%=pageNum%>页|共<%=pagecuont%>页
<%
ifpagecuont>0then避免以后前往的为空纪录,即数据库中该数据集为空
ifpageNum>1then%>
<ahref="modifychart.asp?pageNum=1"><fontcolor="#FFFFFF">首页</font></a>
<%
elseResponse.Write"首页"
endif
ifpageNum>10then
若有必要,请在这里添上假如不敷10页时该完成前n页的代码,
请参考上面的假如前面不敷10页时该怎样处置的代码和思绪
%>
<ahref="modifychart.asp?pageNum=<%=(pageNum-10)%>"><fontcolor="#FFFFFF">前10页</font></a>
<%
endif
if(pageNum+10)<pagecuontthen
这里也不异参考上面的思绪
%>
<ahref="modifychart.asp?pageNum=<%=(pageNum+10)%>"><fontcolor="#FFFFFF">下10页</font></a>
<%
endif
if(pageNum+10)<pagecuontthen
这里判别前面是不是另有10页
endpage=pageNum+9
else
endpage=pageCount
endif
fori=pageNumtoendPage
%>
<ahref="modifychart.asp?pageNum=<%=i%>">第<%=i%>页</a>
<%
next
ifpageNumpageCountthen
%>
<ahref="modifychart.asp?pageNum=<%=pagecuont%>"><fontcolor="#FFFFFF">末页</font></a>
<%
endif
endifendof--->ifpageCount>0then
%>
</div>
</body>
</html>缺乏可以共同遵循的行业标准,ASP还处在发展初期,大家对它的理解不同,如产品和服务标准,收费标准等,不利于行业的健康发展。 |
|