ASP双列显示问题

来源:百度知道 编辑:UC知道 时间:2024/06/05 16:07:20
如何做到从数据库调用数据分两列显示.但遇到单数时最后一行只显示一个.
我的代码如下:
<%dim bsortid,rs
bsortid=Request.QueryString("id")
set rs=Server.CreateObject("adodb.recordset")
rs.open "select * from ssort where bsortid="&bsortid,conn,1,1
if rs.recordcount=0 then
Response.Write "<br>No sort available"

else
while not rs.eof
%>
<table width="100%" border="0" cellspacing="0" cellpadding="0" align="center">
<tr valign="top" class="kuang">
<td width="50%" class="kuang" align="center"><table width="100%" border="0" cellspacing="2" cellpadding="4">
<tr>
<td height="135" align="center"><a href="product.asp?id=<%=rs("ssortid")%>"><img border="0" s

不用这样,我发你一个示例代码吧,用mod就可以了
HFI=1
S=""
S=S&"<table border=0 cellpadding=0 cellspacing=0 width=730><tr>"

set RsNfl = server.CreateObject("ADODB.RECORDSET")
RsNfl.open "Select id From Article_Class "&Twhere&" and tj>0 order by px asc",conn,1,1
while not RsNfl.eof
S=S&"<td width=360 valign=top>"&WriteHelpNews(mypath,mykeyword,MaxNum,1,RsNfl("id"),1)&"</td>"
if HFI mod 2 = 0 then
S=S&"</tr><tr><td width=730 height=10 colspan=3></td></tr><tr>"
else
S=S&"<td width=10></td>"
end if
HFI=HFI+1
RsNfl.MoveNext
wend
RsNfl.close
set RsNfl=nothing

if right(S,4)="<tr>" then S=left(S,len(S)-4)

S=S&"</table>"