ASP Content Linking 元件

嘗試一下 - 執行個體

Content Linking 元件

本例建構一個内容清單。

Content Linking 元件 2

本例使用 Content Linking 元件在一個文本檔案所列的頁面間進行導航。

ASP Content Linking 元件

ASP Content Linking 元件用于建立快捷便利的導航系統！

Content Linking 元件會傳回一個 Nextlink 對象，這個對象用于容納需要導航網頁的一個清單。

文法

Set nl=Server.CreateObject("MSWC.NextLink")

ASP Content Linking 執行個體

首先，我們會建立一個文本檔案 - "links.txt"：

asp_intro.asp ASP 簡介

asp_syntax.asp ASP 文法

asp_variables.asp ASP 變量

asp_procedures.asp ASP 程式

上面的文本檔案包含需要導航的頁面。頁面的排列順序應該與它們的顯示順序相同，并包含對每個檔案名的描述（使用制表符來分隔檔案名和描述資訊）。

注釋：

如果您希望向清單添加頁面，或者改變在清單中的頁面順序，那麼您需要做的僅僅是修改這個文本檔案而已！導航會自動更新！

然後我們建立一個引用檔案，"nlcode.inc"。.inc 檔案建立一個 NextLink 對象來在 "links.txt" 中列出的頁面間進行導航。

"nlcode.inc":

dim nl

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

請在文本檔案 "links.txt" 列出的每個 .asp 頁面中放置一行代碼：

。這行代碼會在 "links.txt" 中列出每個頁面上引用 "nlcode.inc" 中的代碼，這樣導航就可以工作了。

ASP Content Linking 元件的方法

方法	描述	執行個體
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。	c=nl.GetListIndex("links.txt") Response.Write("Item number ") Item number 3
GetNextDescription	傳回在内容連結清單檔案中所列的下一個條目的文本描述。如果在清單檔案中沒有找到目前檔案，則傳回清單中最後一個頁面的文本描述。	c=nl.GetNextDescription("links.txt") Response.Write("Next ") Response.Write("description is: ") Next description is: ASP Variables
GetNextURL	傳回在内容連結清單檔案中所列的下一個條目的 URL。如果在清單檔案中沒有找到目前檔案，則傳回清單中最後一個頁面的 URL。	c=nl.GetNextURL("links.txt") Response.Write("URL is: ") Next URL is: asp_variables.asp
GetNthDescription	返在内容連結清單檔案中所列的第 N 個頁面的描述資訊。	c=nl.GetNthDescription("links.txt",3) Response.Write("Third ") Third description is: ASP Variables
GetNthURL	傳回在内容連結清單檔案中所列的第 N 個頁面的 URL。	c=nl.GetNthURL("links.txt",3) Third URL is: asp_variables.asp
GetPreviousDescription	傳回在内容連結清單檔案中所列的前一個條目的文本描述。如果在清單檔案中沒有找到目前檔案，則傳回清單中第一個頁面的文本描述。	c=nl.GetPreviousDescription("links.txt") Response.Write("Previous ") Previous description is: ASP Variables
GetPreviousURL	傳回在内容連結清單檔案中所列的前一個條目的 URL。如果在清單檔案中沒有找到目前檔案，則傳回清單中第一個頁面的 URL。	c=nl.GetPreviousURL("links.txt") Previous URL is: asp_variables.asp