
27/10/2006, 09:40
|
| | Fecha de Ingreso: septiembre-2003
Mensajes: 265
Antigüedad: 21 años, 7 meses Puntos: 1 | |
Aqui esta el codigo
Código:
temp = startCounter
if Not rs.EOF then 'ESTA ES LA LINEA 77
Do While temp > 0
temp = temp - 1
rs.MoveNext
loop
end if
end_num = 0
num = startCounter
counter = num + 20
DO WHILE NOT rs.EOF
if num < counter then
num = num + 1
%>
<tr>
<td>
<%=rs(0)%>
</td>
<td>
<%=rs(1)%>
</td>
<td>
<%=rs(2)%>
</td>
<td>
<%=rs(3)%>
</td>
</tr>
<%
rs.MoveNext
if rs.eof then
EXIT DO
end if
else
end_num = 1
EXIT DO
end if
LOOP
|