Asp zufriedene Verbindung

Um eine gesteuert zu werden Liste von Webseiten zu halten, bringt der zufriedene verbindenbestandteil einen Nextlink Gegenstand zur�ck der benutzt wird

Syntax

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

Zuerst stellen wir eine Textakte - �links.txt� her. Diese Akte enth�lt die gesteuert zu werden Seiten. Die Seiten m�ssen im gleichen Auftrag verzeichnet werden, den du sie angezeigt werden w�nschst, und er mu� eine Beschreibung f�r jeden Dateinamen auch enthalten (die Tabulatortaste verwenden, um Dateinamen von der Beschreibung zu trennen). Anmerkung: Alles, das du tun mu�t, ist, die Textakte zu �ndern! Die Navigation ist automatisch korrekt, wenn du eine Seite der Liste hinzuf�gen oder den Auftrag der Seiten in der Liste �ndern m�chtest.

�links.txt�

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

Auf jeder der Seiten verzeichnete oben, setzen eine Linie Code: <! -- #include file= " nlcode.inc "-->. Diese Linie schlie�t den Code unten auf jeder Seite ein, die in �links.txt� verzeichnet wird und die Navigation arbeitet.

�nlcode.inc�

<%
'Use the Content Linking Component
'to navigate between the pages listed
'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("'>Previous Page</a>")
end if
Response.Write("<a href='" & nl.GetNextURL("links.txt"))
Response.Write("'>Next Page</a>")
%>

Des Asp zufriedenen verbindendie methoden bestandteils sind unten beschrieben:

Methoden

Property	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) %> < p>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