hvorfor virker det ikke ?

hej. jeg forstår simpelt hen ikke at antallet af records altid bliver udskrevet som 1 på alle de steder hvor der står:
response.write antal

- i dbén ligge flere records af samme slags....






a = request.querystring(\"a\")
rs = \"SELECT r1, r2, r3, r4, r5, r6, r7, r8, r9 ,r10, r11, r12, r13, r14, r15, r16, r17, r18, r19 ,r20, r21, r22, r23, r24, r25, r26, r27, r28, r29, r30, r31, r32, r33, r34, r35, r36, r37, r38, r39 ,r40, r41, r42, r43, r44, r45, r46, r47, r48, r49 ,r50, r51, r52, r53, r54, r55, r56, r57, r58, r59 ,r60 FROM Browsere WHERE brugernavn = (\'\"&a&\"\')\"
set rs = conn.execute(rs)

If rs.bof and rs.eof then
repsonse.write \"ingenting oprettet\"

else


dim b(60)
  for i=1 to 60
  b(i) = rs(\"r\" & i)
next


  for i=60 to 2 step -1
    for j=i to 60
      if b(j-1)>b(j) then
        tmp=b(j-1):b(j-1)=b(j):b(j)=tmp
      end if
    next
  next




hvor=\"\"
antal=0
 
 
 
 
  for i=1 to 60
 
 
 
          if hvor = \"none\" then
              response.write \"\"
   
  else
if b(i)<>hvor then
if hvor<>\"\" then %>
                </font></p>
              <font size=\"2\" face=\"Verdana, Arial, Helvetica, sans-serif\"><table width=\"90%\" border=\"0\">
                <tr>
                  <td width=\"80%\"><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">
                    <a href=\"<%response.write hvor %>\" target=\"_blank\">
                    <%if (len(hvor)>60) THEN
response.write(Left(hvor,60))
else
response.write(hvor)
end if
%>
                    </a></font></td>
                  <td width=\"10%\">
                    <div align=\"right\"> <font size=\"2\" face=\"Arial, Helvetica, sans-serif\">
                      <%response.write antal%>
                      </font> </div>
                  </td>
                </tr>
              </table>
       
<%
end if
end if

hvor=b(i)
antal=0
end if
antal=antal+1
    next
if hvor = \"none\" then
          response.write \"\"
    else




if hvor<>\"\" then %>
              <table width=\"90%\" border=\"0\">
                <tr>
                  <td width=\"80%\"><font size=\"2\" face=\"Arial, Helvetica, sans-serif\">
                    <a href=\"<%response.write hvor %>\" target=\"_blank\">
   
   
   
   
   
<%if (len(hvor)>60) THEN
response.write(Left(hvor,60))
else
response.write(hvor)
%>
                    </a></font></td>
                  <td width=\"10%\">
                    <div align=\"right\"> <font size=\"2\" face=\"Arial, Helvetica, sans-serif\">
<%         
end if
response.write antal   
%>
                      </font> </div>
                  </td>
                </tr>
              </table>
<%
end if
rs.close
end if
%>