Componente Content Linking de ASP

Ejemplo

Componente de Enlaces de Contenido
En este ejemplo, se construirá una lista de contenido.
Componente de Enlaces de Contenido 2
En este ejemplo, se utiliza el componente de Enlaces de Contenido para navegar entre las páginas listadas en un archivo de texto.

Componente Content Linking de ASP

El componente de Enlaces de Contenido de ASP se utiliza para crear un sistema de navegación rápido y conveniente.

El componente de Enlaces de Contenido devuelve un objeto Nextlink, que se utiliza para contener una lista de páginas que se deben navegar.

Sintaxis

<%
Set nl=Server.CreateObject( "MSWC.NextLink" )
%>

Primero, crearemos un archivo de texto - "links.txt". Este archivo contiene información relacionada con las páginas que se deben navegar. El orden de las páginas debe coincidir con su orden de visualización y debe incluir una descripción de cada archivo (separando el nombre del archivo y la información de descripción con tabuladores).

Nota:Si deseas agregar información de archivos a la lista o cambiar el orden de las páginas en la lista, todo lo que necesitas hacer es modificar este archivo de texto. ¡Luego, el sistema de navegación se actualizará automáticamente!

"links.txt":

asp_intro.asp ASP Introducción
asp_syntax.asp ASP Sintaxis
asp_variables.asp ASP Variables
asp_procedures.asp ASP Procedimientos 

Coloca esta línea en las páginas enumeradas anteriormente: <!-- #include file="nlcode.inc"-->. Esta línea lista cada página en "links.txt" que hace referencia a este código inferior, de modo que la navegación funcionará.

"nlcode.inc":

<%
"Usar el componente de Enlaces de Contenido 
"para navegar entre las páginas listadas
"en links.txt
dim nl
Set nl=Server.CreateObject("MSWC.NextLink")
si (nl.GetListIndex("links.txt")>1) entonces
  Response.Write("<a href='" & nl.GetPreviousURL("links.txt"))
  Response.Write("'>Página Anterior</a>")
fin si
Response.Write("<a href='" & nl.GetNextURL("links.txt"))
Response.Write("'>Página Siguiente</a>")
%>

Métodos del componente de Enlaces de Contenido ASP

Método GetListCount

Devuelve el número de elementos listados en el archivo de lista de enlaces de contenido:

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetListCount("links.txt") 
Response.Write("Hay ")
Response.Write(c)
Response.Write(" elementos en la lista")
%>

Salida:}}

Hay 4 elementos en la lista

Método GetListIndex

Devuelve el índice actual del archivo de lista de enlaces de contenido. El índice del primer elemento es 1. Si la página actual no está en el archivo de lista, se devuelve 0.

Ejemplo

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetListIndex("links.txt") 
Response.Write("Número de artículo ")
Response.Write(c)
%>

Salida:}}

Número de artículo 3

Método GetNextDescription

Devuelve la descripción de texto del siguiente elemento en la lista de enlaces de contenido del archivo. Si no se encuentra el archivo actual en la lista, se devuelve la descripción de texto de la última página de la lista.

Ejemplo

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetNextDescription("links.txt") 
Response.Write("Next ")
Response.Write("description is: ")
Response.Write(c)
%>

Salida: La próxima descripción es: Variables ASP

Método GetNextURL

Devuelve la URL del siguiente elemento en la lista de enlaces de contenido del archivo. Si no se encuentra el archivo actual en la lista, se devuelve la URL de la última página de la lista.

Ejemplo

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetNextURL("links.txt") 
Response.Write("Next ")
Response.Write("URL es: ")
Response.Write(c)
%>

Salida: La próxima URL es: asp_variables.asp

Método GetNthDescription

Devuelve la información de descripción de la página N en la lista de enlaces de contenido del archivo.

Ejemplo

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetNthDescription("links.txt",3) 
Response.Write("Third ")
Response.Write("description is: ")
Response.Write(c)
%>

Salida: La tercera descripción es: Variables ASP

Método GetNthURL

Devuelve la URL de la página N en la lista de enlaces de contenido del archivo.

Ejemplo

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetNthURL("links.txt",3) 
Response.Write("Third ")
Response.Write("URL es: ")
Response.Write(c)
%>

Salida: La tercera URL es: asp_variables.asp

Método GetPreviousDescription

Devuelve la descripción de texto del anterior elemento en la lista de enlaces de contenido del archivo. Si no se encuentra el archivo actual en la lista, se devuelve la descripción de texto de la primera página de la lista.

Ejemplo

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetPreviousDescription("links.txt") 
Response.Write("URL anterior: ")
Response.Write("description is: ")
Response.Write(c)
%>

Salida: La descripción anterior es: Variables ASP

Método GetPreviousURL

Devuelve la URL del anterior elemento en la lista de enlaces de contenido del archivo. Si no se encuentra el archivo actual en la lista, se devuelve la URL de la primera página de la lista.

Ejemplo

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetPreviousURL("links.txt") 
Response.Write("URL anterior: ")
Response.Write("URL es: ")
Response.Write(c)
%>

Salida: La URL anterior es: asp_variables.asp