隔行背景颜色显示不一样

就是表格有很多行显示，想隔行显示的背景颜色不一样，怎么判断奇偶
我现在的代码是：

<%
dim listnum,r_page,allnum,maxpage
listnum = 16
r_page = cint(request("fpage"))
if r_page = "" or r_page <=0 then r_page=1
sql = "select * from jigou order by ID Desc"

set rs = server.CreateObject("ADODB.recordset")
rs.open sql,conn,1,1

allnum = rs.recordcount
maxpage = (allnum -1) \ listnum + 1

if r_page > maxpage then r_page=maxpage

if not rs.eof then
rs.move listnum*(r_page- 1)
i = 1
do while not rs.eof
if len(rs("Title"))>23 then
Title = left(rs("Title"),23)&"..."
else
Title = rs("Title")
end if
%>
<tr bgcolor="F2F2F2" align="center" onmouseover="this.style.backgroundColor='#EEEEEE'" onmouseout="this.style.backgroundColor='#F2F2F2'

哪有那么麻烦，用CSS搞定，好用的话加点分！
<style>
.db { border-collapse:collapse;}
.db tr{ background-color:expression('#F8F8F8,#EFEFEF'.split(',')[rowIndex%2]); }
</style>
<table width="100%" border="1" class="db">
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>
</tr>
<tr>
<td> </td>