Asp与导航文件
网络整理 - 08-19
如果你站点中的页面数很多的话,用手工的方法建立导航栏是很麻烦的,而用Asp 内
置的Content Linking 则可帮你的大忙(当然不是越帮越忙的那种),只要你更新你存有
网页URL 的文本文件,那么它就可以根据你的文本文件自动更新导航链接。
Content Linking创建管理导航链接的Nextlink对象,要使用Content Linking组件,
必须需要先建立 Content Linking List文本文件。Content Linking通过读取这个文件来
获得链接我们希望链接的所有页面的信息。
Content Linking List文件格式如下:
URL 说明行 注释
其中的URL 当然是与页面相关的超链地址,“说明行”就是在显示超级链接的时候显
示的文本信息,后面的“注释”是不被使用的。
下面看看如何具体使用Content Linking组件:
< html>
< head>
< meta http-equiv="Content-Type" content="text/html; charset=gb2312">
< title>Content Linking组件使用实例< /title>
< /head>
< body>
< center>< font color=red>Content Linking组件使用实例< /font>< /center>
< ul>
< %
Set Link=Server.CreateObject("MSWC.NextLink")
lcount=Link.GetListCount("conlink.txt")
Dim i
For i=1 to lcount
< li>< a href="< % =Link.GetNthURL("conlink.txt", i) %>" >< %=Link.GetNt
hDescription("conlink.txt", i) %>< /a>
< % Next %>
< /ul>
< /body>
< /html>
上例中,先用GetListCount方法确定在文件conlink.txt 中有多少条超链,然后利用
循环语句,并使用GetNthURL、GetNthDescription方法逐一将存储在conlink.txt 文件中
的URL和“文本信息”读出并显示给客户端浏览器。
Content Linking组件的方法:
GetListCount(file) 统计超链个数
GetNextURL(file) 取得下一页的URL
GetPreviousDescription(file) 取得上一页的说明行
GetListIndex(file) 取得当前页的索引
GetNthDescription(file,n) 取得第n页的说明行
GetPreviousURL(file) 取得上一页的URL
GetNextDescription(file) 取得下一页的说明行
GetNthURL(file,n) 取得第n页的说明行
如何在每一页中增加形如“上一页”、“下一页”的导航栏
栏是很麻烦的,而用Asp内置的 Content Linking 则可帮你的大忙(当然不是越帮越忙的
如果你的站点中有上千或更多的页面,你就不可能在每一个页面中都编写实现导航超
链的ASP代码。你必须利用服务器端包容SSI,从而避免大量的重复作业。实现方法如下:
将代码< !--#include file="nextprev.inc"-->放在每个页面,在文件nextprev.inc
文件的内容如下:
< %
Set Link=Server.CreateObject("MSWC.NextLink")
count=Link.GetListCount("conlink.txt")
current=link.GetListIndex("conlink.txt")
If current > 1 Then
%>
< a href="< %= Link.GetPreviousURL("conlink.txt") %>">上一页< /a>
< %
End If
If current < count Then
%>
< a href="< %= Link.GetNextURL("conlink.txt") %>">下一页< /a>
< % End If %>
FROM
原作者:不详
来 源:不详