Enumerar registros mostrados

[Uefor]

Hola de nuevo con mis dudas por aquí...

Tengo un formulario donde muestro unos registros que necesito enumerar, la cantidad de registros mostrados varía en función de IdSalidas por lo que necesito enumerarlos correlativamente (1º, 2º, 3º etc...)

Supongo que habrá alguna manera ¿no?

Código:

<%  
	 Dim RS_buzos, SQL_buzos 
     	     
SQL_buzos=" SELECT TOP 15 buzos_incl.*, Socios.*"
SQL_buzos=SQL_buzos&" FROM buzos_incl INNER JOIN Socios" 
SQL_buzos=SQL_buzos&" ON buzos_incl.Socio=Socios.socio "
SQL_buzos=SQL_buzos&" WHERE IdSalidas="&IdSalidas&""
SQL_buzos=SQL_buzos&" ORDER BY Id ASC"

		set RS_buzos=createobject("ADODB.Recordset")
        RS_buzos.open SQL_buzos,conn
        do while not RS_buzos.eof  
%>
  &nbsp;&nbsp;
      <input TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS_buzos("Socio")%>" SIZE="7" READONLY="true">
  &nbsp;&nbsp;
     <input TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS_buzos("Nombre")%>" SIZE="53" READONLY="true">
  &nbsp;&nbsp;
     <input TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS_buzos("DNI")%>" SIZE="12" READONLY="true">
  &nbsp;&nbsp;
     <input TYPE="text" CLASS="fc_dateHover" VALUE="<%=RS_buzos("TIT")%>" SIZE="21" READONLY="true">
     <br />
     <%
    RS_buzos.movenext
    loop	
    RS_buzos.close
    set RS_buzos = nothing
%>
           <% end if 
Conn.close()
Set Conn = nothing
%>