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