Asp - Paginar resultados alfabeticamente
Códigos Asp
Normalmente solemos paginar nuestros resultados de una base de datos mediante numeros, en este caso lo hacemos mediante letras del abecedario, es decir alfabeticamente.
Tutores.org
Mostrando Codigo - Asp
EXPLICACION
Debemos recordar que nuestra conexion debe de ser tipo:
sql="select * from tu tabla where nombre = "&request("id")&""
CODIGO
<% 'Codigo ofrecido por Tutores.org %>
- <%
- ' .........................................
- ' Aqui iria tu conexion a la base de datos
- ' .........................................
- While Not rsconsulta.EOF
- recoge = Left(rsconsulta("nombre"),1)
- recoge = Lcase(recoge)
- active = active + recoge
- rsconsulta.MoveNext
- Wend%>
- <% alfabeto = "abcdefrghijklmnopqrstuvwxyz" %>
- <%
- For z = 1 to 27
- char = Mid(alfabeto,z,1)
- Set letter = New Regexp
- letter.Pattern = char
- Tu_letra = letter.Test(active)
- If Tu_letra = true Then
- Response.Write "<a href=tupagina.asp?id=" & char & ">" & char & "</a> | "
- Else
- Response.Write char & " | "
- End If
- next %>
- <%
- rsconsulta.Close()
- Set rsconsulta = Nothing
- %>
ENLACE AL CODIGO
Si quieres enlazar desde tu pagina a este codigo<!-- Inicio enlace Tutores.org -->
<a title="Tutores.org - Paginar resultados alfabeticamente" href="http://www.tutores.org/codigo/731/" target="_blank">Paginar resultados alfabeticamente</a>
<!-- Final enlace Tutores.org -->
<a title="Tutores.org - Paginar resultados alfabeticamente" href="http://www.tutores.org/codigo/731/" target="_blank">Paginar resultados alfabeticamente</a>
<!-- Final enlace Tutores.org -->
COMENTARIOS