asp如何成功实现表格3列5行
发布时间：2023-08-21 14:35:36 所属栏目：Asp教程 来源：
导读：asp如何实现表格3列5行？相信这个问题把很多朋友们难住了，那么现在错新小编就针对这个问题为大家讲解asp实现表格3列5行的方法。
方案一
复制代码 代码如下:
<!--#include file="conn.asp"-->
<%
方案一
复制代码 代码如下:
<!--#include file="conn.asp"-->
<%
|
asp如何实现表格3列5行？相信这个问题把很多朋友们难住了，那么现在错新小编就针对这个问题为大家讲解asp实现表格3列5行的方法。 方案一 复制代码 代码如下: <!--#include file="conn.asp"--> <% owen1=request("owen1") owen2=request("owen2") %> <table width="95%" border="0" cellpadding="0" cellspacing="0"> <% page=clng(request("page")) Set rs=Server.CreateObject("ADODB.RecordSet") if owen1<>"" and owen2 <>"" then sql="select * from news where BigClassName='"&owen1&"' and SmallClassName='"&owen2&"' order by id desc" rs.Open sql,conn,1,1 elseif owen1<>"" then sql="select * from news where BigClassName='"&owen1&"' order by id desc" rs.Open sql,conn,1,1 end if if rs.eof and rs.bof then response.Write("暂时没有记录") else %> <% rs.PageSize=15 if page=0 then page=1 pages=rs.pagecount if page > pages then page=pages rs.AbsolutePage=page for j=1 to rs.PageSize if (j-1) mod 3=0 then Response.Write("<tr>") %> <td height="24" align="center" > <div align="center"><img src="uppic/<%= RS("firstImageName") %>"width="130" height="100" border="0" /><a href="onews.asp?id=<%= RS("id") %>" target="_blank"><br> <%= RS("TITLE") %></a></div></td> <% if j mod 3=0 then Response.Write("</tr>") rs.movenext if rs.eof then exit for next %> <% end if rs.close set rs=nothing %> </table> 方案二、 复制代码 代码如下: <!--#include file="conn.asp"--> <% owen1=request("owen1") owen2=request("owen2") %> <table width="95%" border="0" cellpadding="0" cellspacing="0"> <% page=clng(request("page")) Set rs=Server.CreateObject("ADODB.RecordSet") if owen1<>"" and owen2 <>"" then sql="select * from news where BigClassName='"&owen1&"' and SmallClassName='"&owen2&"' order by id desc" rs.Open sql,conn,1,1 elseif owen1<>"" then sql="select * from news where BigClassName='"&owen1&"' order by id desc" rs.Open sql,conn,1,1 end if if rs.eof and rs.bof then response.Write("暂时没有记录") else %> <% rs.PageSize=15 if page=0 then page=1 pages=rs.pagecount if page > pages then page=pages rs.AbsolutePage=page for j=1 to (rs.PageSize/3) Response.Write("<tr>") for i=1 to 3 %> <td height="24" align="center" > <div align="center"><img src="uppic/<%= RS("firstImageName") %>"width="130" height="100" border="0" /><a href="onews.asp?id=<%= RS("id") %>" target="_blank"><br> <%= RS("TITLE") %></a></div></td> <% rs.movenext if rs.eof then exit for next Response.Write("</tr>") next %> <% end if rs.close set rs=nothing %> </table> 上面的代码有缺点．． 就是如果是 １６条 那么页面最后一行会空出两列 页面很难看 因为如果１６ 最后一行只显示一列 这样少了两个＜ｔｄ＞＜／ｔｄ＞ 必须进行判断 总数／３的余数 if (rs.recordcount mod 3=2) then response.write("<td> </td>") if (rs.recordcount mod 3=1) then response.write("<td> </td><td> </td>") 这样页面才完整的 asp如何实现表格3列5行的方法就为各位朋友们介绍到这里了，大家是不是也非常的心动呢？如果你也向往在这里学习的话，那就赶紧行动起来吧。 （编辑：聊城站长网） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |
推荐文章
站长推荐
