asp分页多行多列代码(DIV)

把li的样式加上float，加入固定值的width，只要这个width加起来小于等于整个宽，他可以多列显示
<divstyle="width:500px">
<ul>
<%fori=0to10%>
<listyle="width:100px;float:left"><%=i%></li>
<%next%>
</ul>
</div>



<!--以下是通用多列多行代码-->
<table>
<%'行循环判断to后面是行数
fori=1to5
%>
<tr>
<%'列循环判断to后面是列数
forj=1to2
ifnotrs.eofthen
%>
<td>显示内空</td>
<%
rs.movenext
else
%>
<td></td>
<%
endif
next
%>
</tr>
<%
next
%>
</table>


<!--以下是通用分页代码-->
<!--＃includefile="../conn.asp"-->//路径按自己的设置好
<%
dimi,intPage,page,pre,last,filepath
setrs=server.CreateObject("adodb.recordset")
sql="select*fromuserorderbyuser_IDdesc"
rs.PageSize=20//这里设定每页显示的记录数
rs.CursorLocation=3
rs.Opensql,conn,0,2,1//这里执行你查询SQL并获得结果记录集
pre=true
last=true
page=trim(Request.QueryString("page"))

iflen(page)=0then
intpage=1
pre=false
else
ifcint(page)=<1then
intpage=1
pre=false
else
ifcint(page)>=rs.PageCountthen
intpage=rs.PageCount
last=false
else
intpage=cint(page)
endif
endif
endif
ifnotrs.eofthen
rs.AbsolutePage=intpage
endif
%>
<!--循环开始-->
<%
fori=1tors.PageSize
ifrs.EOForrs.BOFthenexitfor
%>
..................
//（以下是要循环显示的内容）..................
...................
<%
rs.movenext
next
%>
<!--循环体结束
分页部分：-->
<tablewidth="99%"border="1"cellpadding="2"cellspacing="2"borderColorLight=#808080borderColorDark=#ffffff>
<tr>
<%ifrs.pagecount>0then%>
<tdwidth="13%"align="left">当前页<%=intpage%>/<%=rs.PageCount%></td>
<%else%>
<tdwidth="41%"align="left">当前页0/0</td><%endif%>
<tdwidth="46%"align="right"><ahref="本页.asp?page=1">首页</a>|
<%ifprethen%>
<%ifrs.pagecount=1then'判断是否显示上页、下页
Response.Write""
else%>
<ahref="本页.asp?page=<%=intpage-1%>">上页</a>|<%endif%>
<%iflastthen%>
<ahref="本页.asp?page=<%=intpage+1%>">下页</a>|
<%endif
endif%>
<ahref="本页.asp?page=<%=rs.PageCount%>">尾页</a>|转到第
<selectname="sel_page">
<%
fori=1tors.PageCount
ifi=intpagethen%>
<optionvalue="本页.asp?page=<%=i%>"selected><%=i%></option>
<%else%>
<optionvalue="本页.asp?page=<%=i%>"><%=i%></option>
<%
endif
next
%>
</select>页</font>
</td>
</tr>
</table>



下面是DIV的多行多列，试试

<style>
<!--
ul{margin:0;padding:0;float:left}
li{list-style-type:none;}
-->
</style>
<DIV>
<%
fori=1to6'行循环判断to后面是列数
%>
<ul>
<%
forj=1to4'列循环判断to后面是行数
ifnotrs.eofthen
%>
<li>
<imgborder="1"height="131"src="http://iamh.cn/blog/images/cc.png"width="98">
</li>
<%
rs.movenext
else
%>
</li>
<%
endif
next
%>
</ul>
<%
next
%>
</DIV>
<%endif%>