Asp與導(dǎo)航文件
發(fā)表時(shí)間:2024-02-15 來(lái)源:明輝站整理相關(guān)軟件相關(guān)文章人氣:
[摘要]如果你站點(diǎn)中的頁(yè)面數(shù)很多的話,用手工的方法建立導(dǎo)航欄是很麻煩的,而用Asp 內(nèi) 置的Content Linking 則可幫你的大忙(當(dāng)然不是越幫越忙的那種),只要你更新你存有 網(wǎng)頁(yè)URL 的文本文件,那么它就可以根據(jù)你的文本文件自動(dòng)更新導(dǎo)航鏈接。 Content Linking創(chuàng)建管理導(dǎo)航鏈接的N...
如果你站點(diǎn)中的頁(yè)面數(shù)很多的話,用手工的方法建立導(dǎo)航欄是很麻煩的,而用Asp 內(nèi)
置的Content Linking 則可幫你的大忙(當(dāng)然不是越幫越忙的那種),只要你更新你存有
網(wǎng)頁(yè)URL 的文本文件,那么它就可以根據(jù)你的文本文件自動(dòng)更新導(dǎo)航鏈接。
Content Linking創(chuàng)建管理導(dǎo)航鏈接的Nextlink對(duì)象,要使用Content Linking組件,
必須需要先建立 Content Linking List文本文件。Content Linking通過(guò)讀取這個(gè)文件來(lái)
獲得鏈接我們希望鏈接的所有頁(yè)面的信息。
Content Linking List文件格式如下:
URL 說(shuō)明行 注釋
其中的URL 當(dāng)然是與頁(yè)面相關(guān)的超鏈地址,“說(shuō)明行”就是在顯示超級(jí)鏈接的時(shí)候顯
示的文本信息,后面的“注釋”是不被使用的。
下面看看如何具體使用Content Linking組件:
< html>
< head>
< meta http-equiv="Content-Type" content="text/html; charset=gb2312">
< title>Content Linking組件使用實(shí)例< /title>
< /head>
< body>
< center>< font color=red>Content Linking組件使用實(shí)例< /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 中有多少條超鏈,然后利用
循環(huán)語(yǔ)句,并使用GetNthURL、GetNthDescription方法逐一將存儲(chǔ)在conlink.txt 文件中
的URL和“文本信息”讀出并顯示給客戶端瀏覽器。
Content Linking組件的方法:
GetListCount(file) 統(tǒng)計(jì)超鏈個(gè)數(shù)
GetNextURL(file) 取得下一頁(yè)的URL
GetPreviousDescription(file) 取得上一頁(yè)的說(shuō)明行
GetListIndex(file) 取得當(dāng)前頁(yè)的索引
GetNthDescription(file,n) 取得第n頁(yè)的說(shuō)明行
GetPreviousURL(file) 取得上一頁(yè)的URL
GetNextDescription(file) 取得下一頁(yè)的說(shuō)明行
GetNthURL(file,n) 取得第n頁(yè)的說(shuō)明行
如何在每一頁(yè)中增加形如“上一頁(yè)”、“下一頁(yè)”的導(dǎo)航欄
欄是很麻煩的,而用Asp內(nèi)置的 Content Linking 則可幫你的大忙(當(dāng)然不是越幫越忙的
如果你的站點(diǎn)中有上千或更多的頁(yè)面,你就不可能在每一個(gè)頁(yè)面中都編寫(xiě)實(shí)現(xiàn)導(dǎo)航超
鏈的ASP代碼。你必須利用服務(wù)器端包容SSI,從而避免大量的重復(fù)作業(yè)。實(shí)現(xiàn)方法如下:
將代碼< !--#include file="nextprev.inc"-->放在每個(gè)頁(yè)面,在文件nextprev.inc
文件的內(nèi)容如下:
< %
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") %>">上一頁(yè)< /a>
< %
End If
If current < count Then
%>
< a href="< %= Link.GetNextURL("conlink.txt") %>">下一頁(yè)< /a>
< % End If %>
(出處:熱點(diǎn)網(wǎng)絡(luò))