Component voor het koppelen van ASP- inhoud


Meer voorbeelden


Maak een inhoudsopgave.


Gebruik de Content Linking Component om tussen de pagina's in een tekstbestand te navigeren.


Component voor het koppelen van ASP-inhoud

De component ASP Content Linking wordt gebruikt om een ​​snel en eenvoudig navigatiesysteem te maken!

De component Content Linking retourneert een Nextlink-object dat wordt gebruikt om een ​​lijst met te navigeren webpagina's vast te houden.

Syntaxis

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

Voorbeeld van koppeling van ASP-inhoud

Eerst maken we een tekstbestand - "links.txt":

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

Het bovenstaande tekstbestand bevat de pagina's waarin moet worden genavigeerd. De pagina's moeten worden weergegeven in dezelfde volgorde waarin u ze wilt weergeven, en het moet ook een beschrijving bevatten voor elke bestandsnaam (gebruik de tab-toets om de bestandsnaam en de beschrijving te scheiden).

Opmerking: als u een pagina wilt toevoegen of de volgorde van de pagina's in de lijst wilt wijzigen; u hoeft alleen het tekstbestand aan te passen! De navigatie wordt automatisch gecorrigeerd!

Vervolgens maken we een include-bestand aan, "nlcode.inc". Het .inc-bestand maakt een NextLink-object om te navigeren tussen de pagina's die worden vermeld in "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>")
%>

Plaats in elk van de .asp-pagina's die worden vermeld in het tekstbestand "links.txt", één regel code: <!-- #include file="nlcode.inc"--> . Deze regel bevat de code in "nlcode.inc" op elke pagina vermeld in "links.txt" en de navigatie zal werken.



Methoden voor het koppelen van ASP-inhoudscomponenten

Method Description Example
GetListCount Returns the number of items listed in the Content Linking List file <%
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 Returns the index number of the current item in the Content Linking List file. The index number of the first item is 1. 0 is returned if the current page is not in the Content Linking List file <%
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 Returns the text description of the next item listed in the Content Linking List file. If the current page is not found in the list file it returns the text description of the last page on the list <%
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 Returns the URL of the next item listed in the Content Linking List file. If the current page is not found in the list file it returns the URL of the last page on the list <%
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 Returns the description of the Nth page listed in the Content Linking List file <%
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 Returns the URL of the Nth page listed in the Content Linking List file <%
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 Returns the text description of the previous item listed in the Content Linking List file. If the current page is not found in the list file it returns the text description of the first page on the list <%
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 Returns the URL of the previous item listed in the Content Linking List file. If the current page is not found in the list file it returns the URL of the first page on the list <%
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