一共N条新闻，怎样从新闻中把奇数的挑出来放在一个表格里面，把偶数的挑出来放在另一个表格里面？

[nup]

一共N条新闻，怎样从新闻中把奇数的挑出来放在一个表格里面，把偶数的挑出来放在另一个表格里面？

[ronaltang]

假设你以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>

[lonelyghost]

如果有一个字段来区分奇偶，也可以直接用 SQL 语句：
/* 奇数 */
SELECT *
INTO OddNews
FROM News
WHERE (NewsID / 2) * 2 <> NewsID

/* 偶数 */
SELECT *
INTO EvenNews
FROM News
WHERE (NewsID / 2) * 2 = NewsID

[ehom]

上面的方法不好!只需要一次循环!
do while not rs.eof
response.write "<tr><td>"&rs("id")&"</td>"
rs.MoveNext
response.write "<td>"&rs("id")&"</td></tr>"
rs.MoveNext
loop
这只是例子,如果要好看,最后一条是奇还是偶也要判断下!以决定最后是否多加个单元格!

[lishizhen2002]

<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

[ronaltang]

ehom(？！)
请看清楚，他需要的是两个表格，不是两列

[ehom]

哈哈!我理解的很清楚!通常这种情况就是两列!

[ronaltang]

这位老兄，如果满意的话就结贴了吧

[希偌]

上面的方法都不是很好，用字符串接收！
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>

[希偌]

不好意思，写反了！
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>

[dgz01]

关键是对记录号判断，怎么写随自已的了如指掌

＊＊＊＊＊
打工好辛苦
＊＊＊＊＊
钞票好难赚
＊＊＊＊＊
编程好伤神
＊＊＊＊＊
光阴好易混
＊＊＊＊＊

[ChinaOk]

aryList=rs.getRows()