ASP-Content Linking-Komponente

Beispiel

Content Linking Komponente
In diesem Beispiel wird eine Inhaltsliste erstellt.
Content Linking Komponente 2
In diesem Beispiel wird das Content Linking-Component verwendet, um zwischen den Seiten zu navigieren, die in einer Textdatei aufgeführt sind.

ASP-Content Linking-Komponente

Das ASP Content Linking-Component wird verwendet, um eine schnelle und bequeme Navigationsstruktur zu erstellen.

Das Content Linking-Component gibt ein Nextlink-Objekt zurück, das zur Aufnahme einer Liste der zu navigierenden Webseiten dient.

Syntax

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

Zunächst erstellen wir eine Textdatei - "links.txt". Diese Datei enthält Informationen zu den zu navigierenden Seiten. Die Reihenfolge der Seiten sollte mit ihrer Anzeigereihenfolge übereinstimmen und eine Beschreibung jedes Dateis (durch Tabulatoren getrennt) enthalten.

Anmerkung:Wenn Sie Dateiinformationen zur Liste hinzufügen oder die Reihenfolge der Seiten in der Liste ändern möchten, müssen Sie nur diese Textdatei ändern! Der Navigationsbereich wird dann automatisch aktualisiert!

"links.txt":

asp_intro.asp ASP-Einführung
asp_syntax.asp ASP-Syntax
asp_variables.asp ASP-Variable
asp_procedures.asp ASP-Programm

Platzieren Sie diesen Codezeile in den oben aufgelisteten Seiten: <!-- #include file="nlcode.inc"-->. Diese Zeile listet jede Seite im "links.txt" auf, auf der das folgende Codeabschnitt referenziert wird, so dass die Navigation funktioniert.

"nlcode.inc":

<%
"Verwenden Sie das Content Linking Komponent 
"um zwischen den aufgelisteten Seiten zu navigieren
"in links.txt
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("'>Vorherige Seite</a>")
end if
Response.Write("<a href='" & nl.GetNextURL("links.txt"))
Response.Write("'>Nächste Seite</a>")
%>

ASP Content Linking Komponentenmethoden

GetListCount Methode

Gibt die Anzahl der im Inhalt-Verknüpfungslistenfile aufgelisteten Elemente zurück:

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetListCount("links.txt") 
Response.Write("Es gibt ")
Response.Write(c)
Response.Write(" Einträge in der Liste")
%>

Ausgabe:}}

Es gibt 4 Einträge in der Liste

GetListIndex Methode

Gibt die Indexnummer des aktuellen Dateis im Inhalt-Verknüpfungslistenfile zurück. Die Indexnummer des ersten Eintrags ist 1. Falls die aktuelle Seite nicht im Listfile ist, wird 0 zurückgegeben.

Beispiel

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetListIndex("links.txt") 
Response.Write("Artikelnummer ")
Response.Write(c)
%>

Ausgabe:}}

Artikelnummer 3

GetNextDescription Methode

Gibt die Textbeschreibung des nächsten Eintrags aus der Liste der Inhalteverknüpfungsdatei zurück. Falls die aktuelle Datei in der Liste nicht gefunden wird, die Textbeschreibung der letzten Seite der Liste.

Beispiel

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetNextDescription("links.txt") 
Response.Write("Nächster ")
Response.Write("Beschreibung ist: ")
Response.Write(c)
%>

Ausgabe: Die nächste Beschreibung ist: ASP Variablen

GetNextURL Methode

Gibt die URL des nächsten Eintrags aus der Liste der Inhalteverknüpfungsdatei zurück. Falls die aktuelle Datei in der Liste nicht gefunden wird, die URL der letzten Seite der Liste.

Beispiel

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

Ausgabe: Der nächste URL ist: asp_variables.asp

GetNthDescription Methode

Gibt die Beschreibung der N-ten Seite aus der Liste der Inhalteverknüpfungsdatei zurück.

Beispiel

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

Ausgabe: Die dritte Beschreibung ist: ASP Variablen

GetNthURL Methode

Gibt die URL der N-ten Seite aus der Liste der Inhalteverknüpfungsdatei zurück.

Beispiel

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

Ausgabe: Der dritte URL ist: asp_variables.asp

GetPreviousDescription Methode

Gibt die Textbeschreibung des vorherigen Eintrags aus der Liste der Inhalteverknüpfungsdatei zurück. Falls die aktuelle Datei in der Liste nicht gefunden wird, die Textbeschreibung der ersten Seite der Liste.

Beispiel

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetPreviousDescription("links.txt") 
Response.Write("Previous ")
Response.Write("Beschreibung ist: ")
Response.Write(c)
%>

Ausgabe: Die vorherige Beschreibung ist: ASP Variablen

GetPreviousURL Methode

Gibt die URL des vorherigen Eintrags aus der Liste der Inhalteverknüpfungsdatei zurück. Falls die aktuelle Datei in der Liste nicht gefunden wird, die URL der ersten Seite der Liste.

Beispiel

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

Ausgabe: Der vorherige URL ist: asp_variables.asp