Latest web development tutorials

ASP Inhalt Linking

Beispiele

Versuchen Sie - Beispiel

Inhalt Linking Komponente
In diesem Fall wird ein Inhaltsverzeichnis zu erstellen.

Inhalt Linking Komponente 2
In diesem Beispiel wird der Inhalt zwischen den Seiten in einer Textdatei verknüpfen Komponente zu navigieren.


ASP Inhalt Linking Komponente

ASP Inhalt Linking Komponenten für die Erstellung von schnellen und einfachen Navigationssystem!

Inhalt Linking Komponente liefert einen Nextlink-Objekt, das verwendet wird, um eine Liste der erforderlichen Navigationsseite zu halten.

Grammatik

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


ASP Inhalt Linking Beispiele

Zunächst werden wir eine Textdatei erstellen - "links.txt":

asp_intro.asp ASP 简介
asp_syntax.asp ASP 语法
asp_variables.asp ASP 变量
asp_procedures.asp ASP 程序

Der obige Text-Datei, die die erforderliche Navigationsseite enthält. Seite, um sie sollten in der gleichen Reihenfolge angezeigt werden und enthält eine Beschreibung der einzelnen Dateinamen (Verwendung Registerkarten, um den Dateinamen und die Beschreibung zu trennen).

Hinweis: Wenn Sie Seiten in die Liste hinzugefügt werden soll, oder die Reihenfolge der Seiten in der Liste zu ändern, dann Sie tun müssen, ist zu ändern den Text es Datei!Die Navigation wird automatisch aktualisiert!

Wir erstellen dann eine Referenzdatei "nlcode.inc". .inc Dateien zwischen den Seiten eines Nextlink-Objekt in der "links.txt" in der Navigation aufgeführt zu erstellen.

"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>")
%>

Bitte in jeder ASP - Seite Textdatei "links.txt" aufgelistet in derCodezeile platziert: <- # include file = "nlcode.inc !" ->.Diese Codezeile Referenzen "nlcode.inc" Code auf jeder Seite in der "links.txt" aufgeführt in der Navigation funktioniert.


Das Verfahren von ASP Inhalt Linking Komponente

方法 描述 实例
GetListCount 返回内容链接列表文件中所列项目的数量。 <%
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")
%>

输出:

There are 4 items in the list

GetListIndex 返回在内容链接列表文件中当前条目的索引号。第一个条目的索引号是 1。如果当前页面不在内容链接列表文件中,则返回 0。 <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetListIndex("links.txt")
Response.Write("Item number ")
Response.Write(c)
%>

输出:

Item number 3

GetNextDescription 返回在内容链接列表文件中所列的下一个条目的文本描述。如果在列表文件中没有找到当前文件,则返回列表中最后一个页面的文本描述。 <%
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 返回在内容链接列表文件中所列的下一个条目的 URL。如果在列表文件中没有找到当前文件,则返回列表中最后一个页面的 URL。 <%
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 返在内容链接列表文件中所列的第 N 个页面的描述信息。 <%
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 返回在内容链接列表文件中所列的第 N 个页面的 URL。 <%
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 返回在内容链接列表文件中所列的前一个条目的文本描述。如果在列表文件中没有找到当前文件,则返回列表中第一个页面的文本描述。 <%
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 返回在内容链接列表文件中所列的前一个条目的 URL。如果在列表文件中没有找到当前文件,则返回列表中第一个页面的 URL。 <%
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