關(guān)于ASP循環(huán)表格的問(wèn)題之解答[比較詳細(xì)]
更新時(shí)間:2008年11月05日 00:34:06 作者:
在很多時(shí)候,我們采用原始的方法來(lái)解決一行內(nèi)循環(huán)3張圖片,如果上傳者只上傳了2張圖片,那么2張圖片間的距離會(huì)很大,因?yàn)槿鄙倭艘粋€(gè)<td> </td>.
下面是代碼,如果看不懂,建議先把表格的一些<tr><td>的表格原理弄清楚了,就可以了
<table border="0" cellpadding="0" cellspacing="0">
<%
dim rs,sqltext
set rs = Server.CreateObject("adodb.recordset")
sqltext="select * from [bigclass]"
rs.Open sqltext,conn,1,1
m=1
colzs=5 '一行顯示5列
if rs.RecordCount mod colzs=0 then
rowzs=int(rs.RecordCount/colzs)
else
rowzs=int(rs.RecordCount/colzs)+1
end if
for j = 1 to rowzs%>
<tr>
<%for i = 1 to colzs%>
<%if not rs.EOF then%>
<td><input type="checkbox" name="qxflag<%=m%>" value="1"><%=trim(rs("bigname"))%></td>
<%
rs.MoveNext
m = m + 1
else
%>
<td> </td>
<%end if%>
<%next%>
</tr>
<%
next
rs.Close
set rs = nothing
%>
</table>
復(fù)制代碼 代碼如下:
<table border="0" cellpadding="0" cellspacing="0">
<%
dim rs,sqltext
set rs = Server.CreateObject("adodb.recordset")
sqltext="select * from [bigclass]"
rs.Open sqltext,conn,1,1
m=1
colzs=5 '一行顯示5列
if rs.RecordCount mod colzs=0 then
rowzs=int(rs.RecordCount/colzs)
else
rowzs=int(rs.RecordCount/colzs)+1
end if
for j = 1 to rowzs%>
<tr>
<%for i = 1 to colzs%>
<%if not rs.EOF then%>
<td><input type="checkbox" name="qxflag<%=m%>" value="1"><%=trim(rs("bigname"))%></td>
<%
rs.MoveNext
m = m + 1
else
%>
<td> </td>
<%end if%>
<%next%>
</tr>
<%
next
rs.Close
set rs = nothing
%>
</table>
相關(guān)文章
ASP獲取數(shù)據(jù)庫(kù)表名、庫(kù)名、字段名的方法
這篇文章主要介紹了ASP獲取數(shù)據(jù)庫(kù)表名、庫(kù)名、字段名的方法,本文例子使用的是SqlServer數(shù)據(jù)庫(kù),需要的朋友可以參考下2014-07-07插件下載┊垃圾引用防御補(bǔ)?。啃r(shí)自動(dòng)換KEY,支持靜態(tài)頁(yè)面)
插件下載┊垃圾引用防御補(bǔ)丁(每小時(shí)自動(dòng)換KEY,支持靜態(tài)頁(yè)面)...2007-02-02asp實(shí)現(xiàn)二進(jìn)制字符串轉(zhuǎn)換為Unicode字符串
asp實(shí)現(xiàn)二進(jìn)制字符串轉(zhuǎn)換為Unicode字符串...2007-08-08asp下輕松實(shí)現(xiàn)將上傳圖片到數(shù)據(jù)庫(kù)的代碼
asp下輕松實(shí)現(xiàn)將上傳圖片到數(shù)據(jù)庫(kù)的代碼...2007-11-11