Content Linking 組件
本例會構建一個內容列表。
看到本信息說明該文是通過網頁教學（www.webjx.com）整理發布的，請不要刪掉！
本實例代碼如下：
<html>
<body>
<p>下面的例子構建了一個內容列表：</p>
<%
dim c
dim i
set nl=server.createobject("MSWC.Nextlink")
c = nl.GetListCount("/example/aspe/links.txt")
i = 1
%>
<ul>
<%do while (i <= c) %>
<li><a href="<%=nl.GetNthURL("/example/aspe/links.txt", i)%>">
<%=nl.GetNthDescription("/example/aspe/links.txt", i)%></a>
<%
i = (i + 1)
loop
%>
</ul>
<p>文本文件包含頁面 URL 的列表和鏈接描述。
每行文本針對一個頁面。
請注意，URL 和描述必須由 TAB 字符分隔。
</p>
<p>
<a href="/example/aspe/links.txt">查看 links.txt</a>
</p>
</body>
</html>
運行結果如下：
下面的例子構建了一個內容列表：
ASP 簡介
ASP 語法
ASP 變量
ASP 程序
文本文件包含頁面 URL 的列表和鏈接描述。每行文本針對一個頁面。請注意，URL 和描述必須由 TAB 字符分隔。
查看 links.txt
Content Linking 組件 2
本例使用Content Linking 組件在一個文本文件所列的頁面間進行導航。
本實例代碼如下：
<html>
<body>
<h1>這是頁面 1</h1>
<%
Set nl=Server.CreateObject("MSWC.NextLink")
If (nl.GetListIndex("/example/aspe/links2.txt")>1) Then
%>
<a href="<%Response.Write(nl.GetPreviousURL("/example/aspe/links2.txt"))%>">
上一頁
</a>
<%End If%>
<a href="<%Response.Write(nl.GetNextURL("/example/aspe/links2.txt"))%>">
下一頁
</a>
<p>本例使用 Content Linking 組件
對文本文件中的 URL 進行導航。</p>
<p><a href="/example/aspe/links2.txt">查看 links2.txt</a></p>
</body>
</html>
本實例運行結果如下：
這是頁面 1
下一頁
本例使用 Content Linking 組件對文本文件中的 URL 進行導航。
查看 links2.txt
