Loop fra 2 Tabeller

Hvordan får jeg nyrs til at køre i loop indtil rs er færdig?
Jeg har 2 tabeller i en access DB "Kategori" og "Annoncer" i tabellen Kategori har jeg alle mine kategorier og i tabellen Annoncer er annoncerne, og jeg skulle gerne have nedenstående til at vise hvor mange annoncer der er under hver kategori, men jeg kan ikke lige få den til det :)


<!-- #include file="autoslet.asp" -->
<!-- #include file="db.asp" -->
<!-- #include file="top.asp" -->
<%
Set con = Server.CreateObject("ADODB.Connection")
con.Open strDSN

Sql = "SELECT * FROM Kategori ORDER BY Description"
Set RS = Con.Execute(Sql)
Description = RS("Description")

countSQL="SELECT count(*) as antal, Kategori FROM Annoncer GROUP BY kategori"
Set nyRS = Con.execute(countSQL)
'On error resume next
%>   
<%Do While Not RS.EOF%>

<body bgcolor="#C0C0C0">

<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#C0C0C0" id="AutoNumber1" width="400">
  <tr>
    <td width="250%"><a href="kategori.asp?kategori=<%=RS("Description")%>"><%=rs("Description") %>.....</a>&nbsp;</td>
  </tr>
</table>
<%
if RS("Description") = nyrs("kategori") then Response.Write nyrs("Antal") & nyrs("kategori") else Response.Write "Fejl"

RS.MoveNext
nyRS.MoveNext
loop

%></table></body></html>