Loop

Hej!

Jag behöver lite hjälp med en loop (igen)
men det är ingen vanlig loop..utan en loop i loopen!!
jag har två tabeller \"Avd\" och \"Contacts\",
Jag vill först loopa igenom \"Avd\" För att få fram alla Avdelningar och under varje Avdelning loopa igenom alla poster i \"Contacts\" som tillhör rätt avdelning!!
Den första delen är lätt,så jag har fått fram alla avdelningar.
men hur gör jag sedan för att få fram de poster i \"Contacts\" som tillhör rätt Avdelning??
kod kommer här!

-----------------------code--------------------

<!--#include file=\"../EIncludes/connect.asp\"-->
<%
AvdSQL=\"select * from Avd\"
set rsAvd=conntemp.execute(AvdSQL)
\'ContSQL=\"select * from contacts WHERE CAvdID=\" & strAvdID
\'set rsCont=conntemp.execute(ContSQL)
\'strnamn=rsCont(\"namn\")%>
<%if not (rsAvd.eof and  rsAvd.bof) then %>

<table border=\"1\" cellspacing=\"0\" cellpadding=\"0\" width=\"260\" bgcolor=\"#CCCCCC\" bordercolorlight=\"#000000\" bordercolordark=\"#FFFFFF\">
  <tr>
    <td>
      <div align=\"center\" class=\"Rubrik\">::Contact Edit:::</div>
    </td>
    <td width=\"10\"><img src=\"../images/info.gif\" width=\"8\" height=\"14\"></td>
  </tr>
</table>
<table align=\"left\" cellspacing=\"0\" cellpadding=\"0\" border=\"0\" width=\"250\">
  <tr>
    <td valign=\"top\" width=\"10\">&nbsp;</td>
    <td width=\"200\" valign=\"top\">
      <table border=\"0\" cellspacing=\"0\" cellpadding=\"2\" width=\"250\" align=\"center\" class=\"Text\">
        <% \' Now lets grab all the records
do while not rsAvd.eof
strAvdID=rsAvd(\"AvdID\")
strAvdelning=rsAvd(\"Avdelning\")
%>
        <tr valign=\"top\">
          <td align=\"left\" bgcolor=\"#FFFFFF\" valign=\"bottom\">
            <div align=\"center\"></div>
            &nbsp;<%=strAvdelning%> </td>
          <td align=\"left\" width=\"14\" valign=\"top\" bgcolor=\"#FFFFFF\">
            <div align=\"left\"> <a href=\"../EContacts/addContact.asp?Id=<%=strID%>\"><img src=\"../images/pen.gif\" width=\"14\" height=\"14\" border=\"0\"></a></div>
          </td>
          <td align=\"left\" width=\"14\" valign=\"top\" bgcolor=\"#FFFFFF\"><a href=\"../EContacts/sql.asp?Id=<%=strID%>&action=delete\" onClick=\"return confirm(\'Du håller på att ta bort Användaren. Vill du fortsätta??\');\"><img src=\"../images/trashcan.gif\" width=\"13\" height=\"14\" border=\"0\" name=\"id\"></a></td>
        </tr>
        <tr valign=\"top\">
          <td colspan=\"3\" height=\"1\"><img src=\"../images/1pixel_svart.gif\" width=\"100%\" height=\"1\"></td>
        </tr>
<%
rsAvd.movenext
loop
rsAvd.close
set rsAvd=nothing
conntemp.close
set conntemp=nothing %>

        <%end if %>
      </table>
    </td>
    <td valign=\"top\"><br>
      <br>
      <br>
    </td>
</table>
</BODY>
</HTML>