Ordenación de resultados


http://www.asptutor.com

Ordenación de resultados


 Articulo enviado por Virtus    
 

Introducción

En este apartado aprenderemos como podemos ordenar los resultados de una consulta. Esta ordenación la podemos hacer a través de cualquiera de los campos de la tabla, simplemente haciendo click en la columna correspondiente de la cabecera de la tabla. Esta es una manera rápida y sencilla de ordenar los resultados, pero si queréis un sistema mucho mas potente (orden ascendente, descendente, indicador de ordenación, etc.), lo encontrareis en el apartado Recordset Pro de mis paginas.

Ordenacion.asp

Abre tu notepad.exe (o cualquier otro editor ASP) y crea un nuevo fichero. Guardalo como 'Paginacion.asp'. Ahora copia el texto de abajo y pégalo en la nueva pagina. Guardalo todo.

 
<%
  
miConexion= "DRIVER={Microsoft Access Driver (*.mdb)};"
miConexion= miConexion & "DBQ="&Server.Mappath("miBase.mdb")

Set oRS = Server.CreateObject("ADODB.Recordset")
oRS.ActiveConnection = miConexion
oRS.Source = "Select * from miTabla"
oRS.CursorLocation = 3
oRS.Open

OrdenadoPor = Request("OrdenadoPor")
If OrdenadoPor <> "" Then oRS.Sort =  OrdenadoPor
%>


<TABLE  BORDER="1">
	<TR>
	<%For I = 0 To oRS.Fields.Count - 1%>
		<TD><B><A HREF="?OrdenadoPor=<%=oRS.Fields(I).Name%>">
			<%=oRS.Fields(I).Name%></B></A></TD>
	<%Next%>
	</TR>
	<%Do While Not oRS.EOF%>
		<TR>
		<%For I = 0 To oRS.Fields.Count - 1%>
			<TD><%=oRS.Fields(I)%></TD>
		<%Next%>
		</TR>
	<%oRS.MoveNext
	Loop%>
</TABLE>