Como evito

[Lalin412]

Este es el codigo donde muestra el los numeros de enlace o bien los de siguiente o anterior:

<%'Preguntamos si la cantidad de elementos de la matriz es menor
'que la cantidad TOTAL de registros de la tabla
If Ubound(mitabla,2)+1 < total_registros then
'En caso afirmativo calculamos el nº de páginas que tenemos
'y luego mostramos los links a las demás páginas
If (total_registros mod 10) = 0 then
nro_paginas = Int(total_registros / 10)
else
nro_paginas = Int(total_registros / 10) + 1
end if%>
<table border=0 width=98% cellspacing=0 cellpadding=1 align=center>
<tr>
<td bgcolor=black align=left valign=middle style="font-family: Arial; font-size: 8 pt;">
<font color=White><b>
<%'Acá mostramos los links de la forma: Página 1 | 2 | 3 | 4 ...%>
Página
<%For i=0 to nro_paginas-1%>
<%If p = i*10 then%>
<font color=DarkOrange><u><%=i+1%></u></font>
<%else%>
<a href="Opcion0Resultado.asp?ref=<%=i*10%&gt ;" class="e" title="Mostrar la página <%=i+1%>"><%=i+1%></a>
<%end if%>
<%If i < nro_paginas-1 then
Response.Write(" | ")
end if
Next%>
</b></font>
</td>
<td bgcolor=black style="font-family: Arial; font-size: 10 pt;" valign="middle" align="right">
<b>
<%'Acá mostramos los links de la forma: << Anteriores | Siguientes >>
a = p + 10
b = p - 10
if (p = 0) and (Ubound(mitabla,2)+1 < total_registros) then%>
<a href="Opcion0Resultado.asp?ref=<%=a%>&q uot; title="Mostrar los 10 siguientes" class="e">Siguientes >></a>
<%end if
if (p+10 < total_registros) and (p <> 0) then%>
<a href="Opcion0Resultado.asp?ref=<%=b%>&q uot; title="Mostrar los 10 anteriores" class="e"><< Anteriores</a>
<font size=2 color=white> | </font>
<a href="Opcion0Resultado.asp?ref=<%=a%>&q uot; title="Mostrar los 10 siguientes" class="e">Siguientes >></a>
<%elseif (p <> 0) then%>
<a href="Opcion0Resultado.asp?ref=<%=b%>&q uot; title="Mostrar los 10 anteriores" class="e"><< Anteriores</a>
<%end if%>