Sidste post funktion

Hej.
Jeg er ved at bygge et forum.
www.badenudist.dk/stakroge/forum.asp

Vil gerne have det lavet således at man fx her http://www.badenudist.dk/stakroge/forum.asp?mode=topic&forumid=1
Kan se hvem der sidst har skrevet i det thread.

Har prøvet mig lidt frem og er kommet frem til det her

<!--LoopStart-->
        <%
        strSQL = "SELECT * FROM topic INNER JOIN bruger ON topic.brugerid = bruger.id WHERE topic.forumid = " & rforum
        Set rs = Conn.Execute(strSQL)

            if rs.EOF then
            Response.write "<font face=""Arial"" size=""2"">Der er ikke posted et emne, i dette forum endnu. du kunne jo være den første :)</font>"
                else
                do
        %> 
    <tr>
      <td width="8%" bgcolor="#EFEFEF" height="38" bordercolor="#FFFFFF">
      <p align="center">
      <img border="0" src="images/folder.gif"></td>
      <td width="31%" bgcolor="#EFEFEF" height="38" bordercolor="#FFFFFF"><a href=forum.asp?mode=reply&topicID=<%=rs("t_id")%>><font face="Arial" size="2" color="#3366ff"><%=rs("title")%></font></a></td>
      <td width="7%" bgcolor="#DEE3E7" height="38" bordercolor="#FFFFFF"></td>
      <td width="14%" bgcolor="#EFEFEF" height="38" bordercolor="#FFFFFF"></td>
      <td width="19%" bgcolor="#DEE3E7" align="center" height="38" bordercolor="#FFFFFF"><font face="Arial" size="1" color="#3366ff"><%=rs("brugernavn")%></font></td>
      <td width="21%" bgcolor="#EFEFEF" height="38" bordercolor="#FFFFFF">
      <%
      strrSQL = "SELECT * FROM bruger, reply WHERE reply.forumID = " & rs("forumID")&" AND reply.brugerID=bruger.ID ORDER BY reply.dato DESC "
      Set rrs = Conn.execute(strrSQL)
      = rrs("brugernavn")
      %>
     
     
      <td>
    </tr>
        <%
        rs.movenext
        loop while not rs.eof
       
        end if
        %>
    <!--LoopSlut-->

Men det fungere ikke.

Det er som om den bare skriver den første bruger med det laveste id i min "bruger" tabel. nogen hints ?