不好意思,写反了!
dim str="",str1=""
while not rs.eof
if rs("valuename") mod 2=0 then
str=str+"<tr><td>"&rs("valuename")&"</td></tr>"
else
str1=str1++"<tr><td>"&rs("valuename")&"</td></tr>"
end if
rs.movenext
wend
奇数表:
<table><%=str1%></table>
偶数表:
<table><%=str%></table>
上面的方法都不是很好,用字符串接收!
dim str="",str1=""
while not rs.eof
if rs("valuename") mod 2=0 then
str=str+"<tr><td>"&rs("valuename")&"</td></tr>"
else
str1=str1++"<tr><td>"&rs("valuename")&"</td></tr>"
end if
rs.movenext
wend
奇数表:
<table><%=str%></table>
偶数表:
<table><%=str1%></table>
<table>
i=0
do while not rs.eof
i=i+1
if i mod 2=0 then
response.write"<talbe><tr><td>"& rs("fsdfd") & "</td></tr>
end if
rs.movenext
loop
</table>
<table>
i=0
do while not rs.eof
i=i+1
if i mod 2=1 then
response.write"<talbe><tr><td>"& rs("fsdfd") & "</td></tr>
end if
rs.movenext
loop
上面的方法不好!只需要一次循环!
do while not rs.eof
response.write "<tr><td>"&rs("id")&"</td>"
rs.MoveNext
response.write "<td>"&rs("id")&"</td></tr>"
rs.MoveNext
loop
这只是例子,如果要好看,最后一条是奇还是偶也要判断下!以决定最后是否多加个单元格!
假设你以ID为奇、偶判断,则
打开数据库后(假设select * form table order by id)
<%'奇数表%>
<table>
<%
rs.movefirst
do while not rs.eof
response.write "<tr><td>"&rs("id")&"</td></tr>"
rs.move 2
loop%>
</table>
<%'偶数表%>
<table>
<%rs.move 1,1
do while not rs.eof
response.write "<tr><td>"&rs("id")&"</td></tr>"
rs.move 2
loop%>
</table>