Insertar Numero En Columna

[Myakire]

Solo agrega estas líneas:

Código:

<TABLE WIDTH=294 BORDER=1 align="center"  CELLSPACING="1"> 
		    <tr> 
  <td width="10" bgcolor="#F0F0F0"> ID</td>

  <td width="76" bgcolor="#F0F0F0"> <div align="center"><strong><font 
face="Verdana, Arial, Helvetica, sans-serif">Usuario</font></strong></div></td>
  <td width="56" bgcolor="#F0F0F0"> <div align="center"><strong><font face="Verdana, Arial, Helvetica, sans-serif">Hora</font></strong></div></td>
  <td width="55" bgcolor="#F0F0F0"> <div align="center"><strong><font face="Verdana, Arial, Helvetica, sans-serif">Ip</font></strong></div></td>
    <td width="99" bgcolor="#F0F0F0"> <div align="center"><strong><font face="Verdana, Arial, Helvetica, sans-serif">Visitando</font></strong></div></td>

  </tr>
	  <%Cnt=1
               do while not rs.EOF%>
  
	<tr>
       <td><%=Cnt%></td>
  <td><div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><small><%=RS.Fields("idusuario")%></small></font></div></td>
  <td><div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><small><%=RS.Fields("time_accion")%></small></font></div></td>
  <td><div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><small><%=RS.Fields("ip")%></small></font></div></td>
    <td><div align="center"><font size="2" face="Verdana, Arial, Helvetica, sans-serif"><small><%=RS.Fields("visitando")%></small></font></div></td>

<%rs.Movenext
         Cnt = Cnt + 1
%>
  
</tr>
  <%loop