ASP Content LinkingKomponenten

Examples

Probieren Sie es selbst - Beispiele

Content Linking-Komponente
Dieses Beispiel erstellt eine Inhaltsliste.

Content Linking-Komponente 2
Dieses Beispiel verwendet die Content Linking-Komponente, um zwischen Seiten zu navigieren, die in einer Textdatei aufgelistet sind.

ASP Content Linking-Komponente

Die ASP Content Linking-Komponente wird verwendet, um ein schnelles und praktisches Navigationssystem zu erstellen!

Die Content Linking-Komponente gibt ein NextLink-Objekt zurück, das zum Halten einer Liste von Webseiten für die Navigation verwendet wird.

Syntax

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

ASP Content Linking-Beispiele

Zuerst erstellen wir eine Textdatei – "links.txt":

asp_intro.asp ASP-Einführung
asp_syntax.asp ASP-Syntax
asp_variables.asp ASP-Variablen
asp_procedures.asp ASP-Prozeduren

Die obige Textdatei enthält die Seiten, durch die navigiert werden soll. Die Seiten sollten in derselben Reihenfolge angeordnet sein, in der sie angezeigt werden, und eine Beschreibung für jeden Dateinamen enthalten (verwenden Sie einen Tabulator, um Dateiname und Beschreibung zu trennen).

Hinweis:Wenn Sie der Liste Seiten hinzufügen oder die Reihenfolge der Seiten in der Liste ändern möchten, müssen Sie lediglich diese Textdatei bearbeiten! Die Navigation wird automatisch aktualisiert!

Dann erstellen wir eine Referenzdatei, "nlcode.inc". Die .inc-Datei erstellt ein NextLink-Objekt, um zwischen den in "links.txt" aufgelisteten Seiten zu navigieren.

"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("'>Vorherige Seite</a>")
end if
Response.Write("<a href='" & nl.GetNextURL("links.txt"))
Response.Write("'>Nächste Seite</a>")
%>

Platzieren Sie eine Codezeile in jeder .asp-Seite, die in der Textdatei "links.txt" aufgelistet ist:<!-- #include file="nlcode.inc"-->Diese Codezeile verweist auf jeder in "links.txt" aufgelisteten Seite auf den Code in "nlcode.inc", damit die Navigation funktionieren kann.

Methoden der ASP Content Linking-Komponente

Methode Beschreibung Beispiel
GetListCount Gibt die Anzahl der Elemente zurück, die in der Inhaltsverzeichnisdatei (Content Linking-Liste) aufgelistet sind. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetListCount("links.txt")
Response.Write("Es gibt ")
Response.Write(c)
Response.Write(" Elemente in der Liste")
%>

Ausgabe:

Es gibt 4 Elemente in der Liste
GetListIndex Gibt die Indexnummer des aktuellen Elements in der Inhaltsverzeichnisdatei zurück. Die Indexnummer des ersten Elements ist 1. Wenn sich die aktuelle Seite nicht in der Inhaltsverzeichnisdatei befindet, wird 0 zurückgegeben. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetListIndex("links.txt")
Response.Write("Elementnummer ")
Response.Write(c)
%>

Ausgabe:

Elementnummer 3
GetNextDescription Gibt die Textbeschreibung des nächsten Elements in der Inhaltsverzeichnisdatei zurück. Wenn die aktuelle Datei nicht in der Listendatei gefunden wird, wird die Textbeschreibung der letzten Seite in der Liste zurückgegeben. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetNextDescription("links.txt")
Response.Write("Nächste ")
Response.Write("Beschreibung ist: ")
Response.Write(c)
%>

Ausgabe:

Nächste Beschreibung ist: ASP-Variablen
GetNextURL Gibt die URL des nächsten Elements in der Inhaltsverzeichnisdatei zurück. Wenn die aktuelle Datei nicht in der Listendatei gefunden wird, wird die URL der letzten Seite in der Liste zurückgegeben. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetNextURL("links.txt")
Response.Write("Nächste ")
Response.Write("URL ist: ")
Response.Write(c)
%>

Ausgabe:

Nächste URL ist: asp_variables.asp
GetNthDescription Gibt die Beschreibung der N-ten Seite zurück, die in der Inhaltsverzeichnisdatei aufgelistet ist. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetNthDescription("links.txt",3)
Response.Write("Dritte ")
Response.Write("Beschreibung ist: ")
Response.Write(c)
%>

Ausgabe:

Dritte Beschreibung ist: ASP-Variablen
GetNthURL Gibt die URL der N-ten Seite zurück, die in der Inhaltsverzeichnisdatei aufgelistet ist. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetNthURL("links.txt",3)
Response.Write("Dritte ")
Response.Write("URL ist: ")
Response.Write(c)
%>

Ausgabe:

Die dritte URL lautet: asp_variables.asp
GetPreviousDescription Gibt die Textbeschreibung des vorherigen Elements zurück, das in der Content-Linking-List-Datei aufgeführt ist. Wenn die aktuelle Datei in der Listendatei nicht gefunden wird, wird die Textbeschreibung der ersten Seite in der Liste zurückgegeben. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetPreviousDescription("links.txt")
Response.Write("Vorherige ")
Response.Write("Beschreibung ist: ")
Response.Write(c)
%>

Ausgabe:

Die vorherige Beschreibung lautet: ASP Variables
GetPreviousURL Gibt die URL des vorherigen Elements zurück, das in der Content-Linking-List-Datei aufgeführt ist. Wenn die aktuelle Datei in der Listendatei nicht gefunden wird, wird die URL der ersten Seite in der Liste zurückgegeben. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetPreviousURL("links.txt")
Response.Write("Vorherige ")
Response.Write("URL ist: ")
Response.Write(c)
%>

Ausgabe:

Die vorherige URL lautet: asp_variables.asp

Andere Erweiterungen