tutoriais mais recente desenvolvimento web
 

ASP Componente Linking conteúdo

❮ Anterior Próxima Capítulo ❯
Exemplos

Exemplos

O componente Linking conteúdo
Criar uma tabela de conteúdos.

O Content Linking Componente 2
Use o Content Linking Component para navegar entre as páginas de um arquivo de texto.

ASP Component Linking conteúdo

O componente Linking conteúdo ASP é usado para criar um sistema de navegação rápida e fácil!

O componente de vinculação de conteúdo retorna um objeto Nextlink que é usado para manter uma lista de páginas da Web para ser navegado.

Sintaxe

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

ASP conteúdo Exemplo Linking

Primeiro criamos um arquivo de texto - "links.txt" :

asp_intro.asp ASP Intro
asp_syntax.asp ASP Syntax
asp_variables.asp ASP Variables
asp_procedures.asp ASP Procedures

O arquivo de texto acima contém as páginas para ser navegado. As páginas devem ser listados na mesma ordem em que deseja que eles sejam exibidos, e também deve conter uma descrição para cada nome de arquivo (use the tab key to separate file name from description) .

Note: Se você quiser adicionar uma página ou alterar a ordem das páginas na lista; você só tem que modificar o arquivo de texto! A navegação será automaticamente corrigida!

Então vamos criar um arquivo de inclusão, "nlcode.inc" . O arquivo .inc cria um objeto Nextlink para navegar entre as páginas listadas em "links.txt" .

"Nlcode.inc":

<%
dim nl
Set nl=Server.CreateObject("MSWC.NextLink")
if (nl.GetListIndex("links.txt")>1) then
  Response.Write("<a href='" & nl.GetPreviousURL("links.txt"))
  Response.Write("'>Previous Page</a>")
end if
Response.Write("<a href='" & nl.GetNextURL("links.txt"))
Response.Write("'>Next Page</a>")
%>

Em cada uma das páginas ASP listadas no arquivo de texto "links.txt" , coloque uma linha de código: <!-- #include file="nlcode.inc"--> . Esta linha irá incluir o código no "nlcode.inc" em todas as páginas listadas na "links.txt" ea navegação irá funcionar.

Métodos de ASP Content Linking Componente

Método Descrição Exemplo
GetListCount Retorna o número de itens listados no arquivo Lista Linking conteúdo <%
dim nl,c
Set nl=Server. CreateObject("MSWC.NextLink")
c=nl. GetListCount("links.txt")
Response. Write("There are ")
Response. Write(c)
Response. Write(" items in the list")
%>

Output:

There are 4 items in the list

GetListIndex Retorna o número de índice do item atual no arquivo Lista Linking conteúdo. O número de índice do primeiro item é 1. 0 é retornado se a página atual não está no conteúdo Ligando arquivo lista <%
dim nl,c
Set nl=Server. CreateObject("MSWC.NextLink")
c=nl. GetListIndex("links.txt")
Response. Write("Item number ")
Response. Write(c)
%>

Output:

Item number 3

GetNextDescription Retorna o texto de descrição do item seguinte listado no arquivo Lista Linking conteúdo. Se a página atual não é encontrado no arquivo de lista que retorna a descrição do texto da última página da lista <%
dim nl,c
Set nl=Server. CreateObject("MSWC.NextLink")
c=nl. GetNextDescription("links.txt")
Response. Write("Next ")
Response. Write("description is: ")
Response. Write(c)
%>

Next description is: ASP Variables

GetNextURL Retorna o URL do próximo item listado no arquivo Lista Linking conteúdo. Se a página atual não é encontrado no arquivo de lista retorna o URL da última página da lista <%
dim nl,c
Set nl=Server. CreateObject("MSWC.NextLink")
c=nl. GetNextURL("links.txt")
Response. Write("Next ")
Response. Write("URL is: ")
Response. Write(c)
%>

Next URL is: asp_variables.asp

GetNthDescription Retorna a descrição da página Nth listados no arquivo Lista Linking conteúdo <%
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)
%>

Third description is: ASP Variables

GetNthURL Retorna a URL da página Nth listados no arquivo Lista Linking conteúdo <%
dim nl,c
Set nl=Server. CreateObject("MSWC.NextLink")
c=nl. GetNthURL("links.txt",3)
Response. Write("Third ")
Response. Write("URL is: ")
Response. Write(c)
%>

Third URL is: asp_variables.asp

GetPreviousDescription Retorna o texto de descrição do item anterior listados no arquivo Lista Linking conteúdo. Se a página atual não é encontrado no arquivo de lista que retorna a descrição do texto da primeira página da lista <%
dim nl,c
Set nl=Server. CreateObject("MSWC.NextLink")
c=nl. GetPreviousDescription("links.txt")
Response. Write("Previous ")
Response. Write("description is: ")
Response. Write(c)
%>

Previous description is: ASP Variables

GetPreviousURL Retorna o URL do item anterior listados no arquivo Lista Linking conteúdo. Se a página atual não é encontrado no arquivo de lista que retorna a URL da primeira página da lista <%
dim nl,c
Set nl=Server. CreateObject("MSWC.NextLink")
c=nl. GetPreviousURL("links.txt")
Response. Write("Previous ")
Response. Write("URL is: ")
Response. Write(c)
%>

Previous URL is: asp_variables.asp


❮ Anterior Próxima Capítulo ❯