Content Linking 组件

Content Linking 组件创建管理 URL 列表的 Nextlink 对象，这样就可以将 Web 站点上的网页看作书的每一页。可以使用 Content Linking 组件自动生成和更新目录表及先前和后续的 Web 页的导航链接。这对于列出联机报刊以及论坛邮件是十分理想的。

Content Linking 组件引用包含链接 Web 页的列表的内容链接列表文件。该列表存储在 Web 服务器上。

文件名

nextlink.dll	Content Linking 组件。
Content Linking List	这是一个文本文件，其中包含 Web 页的列表，这些 Web 页按所列的顺序显示。该文件必须在 Web 服务器的虚拟路径上可用。

语法

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

参数

NextLink: 指定由 Server.CreateObject 调用创建的对象的名称。

注册表项

无。

方法

GetListCount	统计内容链接列表文件中链接的项目数。
GetNextURL	获取内容链接列表文件中所列的下一页的 URL。
GetPreviousDescription	获取内容链接列表文件中所列的上一页的说明行。
GetListIndex	获取内容链接列表文件中当前页的索引。
GetNthDescription	获取内容链接列表文件中所列的第 N 页的说明。
GetPreviousURL	获取内容链接列表文件中所列的上一页的 URL。
GetNextDescription	获取内容链接列表文件中所列的下一页的说明。
GetNthURL	获取内容链接列表文件中所列的第 N 页的说明。

示例

下面的例子建立目录表：

<ol>
<%  Set NextLink = Server.CreateObject ("MSWC.NextLink") %>  
<%  count = NextLink.GetListCount ("/data/nextlink.txt") %> 
<%  I = 1 %> 

<ul>
<%  Do While (I <= count)  %>  
<li><a href=" <%= NextLink.GetNthURL ("/data/nextlink.txt", I)  %>  "> 
<%= NextLink.GetNthDescription ("/data/nextlink.txt", I) %>  </a> 
<%  I = (I + 1)  %>  
<%  Loop  %>  

</ul>
</ol>

下面的脚本将下一页和上一页按钮添加到 HTML 文件中。

<%  Set NextLink = Server.CreateObject ("MSWC.NextLink") %>  
<%  If (NextLink.GetListIndex ("/data/nextlink.txt") > 1) Then %> 

<a href="  <%= NextLink.GetPreviousURL ("/data/nextlink.txt")  %>  ">

Previous Page</a> 
<%  End If  %>  
<a href="  <%= NextLink.GetNextURL ("/data/nextlink.txt")  %>  ">Next Page</a>