response.Write "<table>"
sColor=0
while not rs.eof
if sColor=0 then
response.write "<tr><td bgcolor='blue'>"&rs(1)&"</td></tr>"
sColor=1
else
response.write "<tr><td bgcolor='yellow'>"&rs(1)&"</td></tr>"
sColor=0
end if
rs.movenext
wend
response.Write "</table>"
Do While Not rs.EOF
if count mod 2 = 0 then COLOR="#FFFFFF" else COLOR="#F5F5F5"
response.write "<tr bgcolor=" & COLOR &">
count = count +1
rs.movenext
loop
<%
set rs = server.createobject("adodb.recordset")
getwen="select wenclass,wenname,wenwriter,wenurl from wen order by wenID asc"
rs.open getwen,conn,1,1
for i=1 to 20 and not rs.eof
if i mod 2=1 then
wenstyle="ad2"
else
wenstyle="ad4"
end if
<tr class=<%=wenstyle%>>
<td width="9%"><%=wenclass%></td>
<td width="75%"><a href="<%=rs(3)%>"><%=rs(1)%></a></td>
<td width="16%"><%=rs(2)%></td>
</tr>
<%
rs.movenext
next
rs.close
set rs=nothing%>
</table>
我这是在CSS里定义了表格,你可以直接改成bgcolor
<% colorflag=1
While not rs.eof
IF colorflag=1 THEN
colorflag=0
colorstr="#e7e7e7"
else
colorflag=1
colorstr="#ffffff"
end if%>
<tr>
<td bgcolor="<%=colorstr%>"><%=rs("id")%></td>
<td bgcolor="<%=colorstr%>"><%=rs("statusnm")&"完成"%></td>
</tr>
<%
rs.MoveNext
wend%>