dim med strp??

Hey?
Har læst lidt på HTML.dk om at springe over i tabellen når man laver udtræk fra databasen.. men syns ikke helt jeg kan se hvordan jeg skal få det til at fungere..

Jeg ville gerne kunne udtrække hver anden post i db'en og så derefter lave en rs.move next loop.

#koden
(har makeret de lige poster i db'en med (#1) og tilsvarende de ulige med (#2)

<%
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath ("/fpdb/kristhedj.mdb")
Conn.Open DSN
SQL1 = "select * from [chart] order by [plads] asc"
Set rs = Conn.Execute(SQL1)
Do While Not rs.EOF
%>
<table class='charten' border='0' width='390px' id='charten' cellspacing='0' cellpadding='0'><tr>
<td width='25px' rowspan='2'><img border='0' src='(#1)<%=rs("billede")%>' width='25px' height='25px'></td>
<td width='20px' align='center'><p>(#1)<%=rs("plads")%></td>
<td width='160px'><p style='margin-bottom: 0'>(#1)<%=rs("titel")%></td>
<td width='160px'>(#1)<%=rs("kunstner")%></td>
<td width='25px' rowspan='2'><img border='0' src='(#2)<%=rs("billede")%>' width='25px' height='25px'></td>
</tr>
<tr>
<td width='20px' align='center'>(#2)<%=rs("plads")%></td>
<td width='160px'>(#2)<%=rs("titel")%></td>
<td width='160px'>(#2)<%=rs("kunstner")%></td>
</tr>
</table>
<%
rs.MoveNext
Loop
rs.Close
Set rs = Nothing
%>

På html.dk skriver de dette eksempel:
dim t
t = 1 to 50 Step 5

her ville jeg jo så vælge at skrive en for de lige og en for de ulige poster:
dim a
a = 1 to 19 step 2
dim b
b = 2 to 20 step 2

hvis det kan gøres sådan, hvad skriver jeg så foran (eller hvor det nu skal skrives?) så det bliver til en slags (dima(rs("titel")))

? ? ?
mvh.
Kristian