ASP Content Linking Component

Hanyar wasan wasan

Content Linking
Hanyar wasan wasan ake samar da wucin gudan.
Content Linking 2
Hanyar wasan wasan Content Linking wani fayil da yake da wucin gudan da ke da neman ci.

ASP Content Linking Component

Kamancin ASP Content Linking yana samar da wucin gudan da ke da neman ci da yana da alhakin samar da wucin gudan da ke da neman ci.

Kamancin Content Linking yana samar da Nextlink object, wanda ke da alhakin kwallaye na tarin wucin gudan da ke da neman ci.

Kamancin yadda ake amfani da ita

<%
Set nl=Server.CreateObject( "MSWC.NextLink" )
%>

Kuwanan, amin ayya kawar da wucin gudan "links.txt". wannan wucin gudan ya tsara bayanin da ke da kama yadda ake neman ci gaba da yadda ake neman ci. tsofina bayanin kuma ya koyar da bayanin kowane fayil (amfani da taba taba don kira lambar fayil da bayanin bayanin).

注释:如果你希望向列表添加文件信息,或者改变在列表中的页面顺序,那么你需要做的所有事情仅仅是修改这个文本文件而已!然后导航系统会自动地更新!

"links.txt":

asp_intro.asp ASP 简介
asp_syntax.asp ASP 语法
asp_variables.asp ASP 变量
asp_procedures.asp ASP 程序 

请在上面列出的页面中放置这行代码:。这行代码会在 "links.txt" 中列出每个页面上引用下面这段代码,这样导航就可以工作了。

"nlcode.inc":

<%
'Use the Content Linking Component 
'to navigate between the pages listed
'in links.txt
dim nl
Set nl=Server.CreateObject("MSWC.NextLink")
if (nl.GetListIndex("links.txt")>1) then
  Response.Write("Previous Page")
end if
Response.Write("Next Page")
%>

ASP Content Linking 组件的方法

GetListCount 方法

返回内容链接列表文件中所列项目的数目:

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetListCount("links.txt") 
Response.Write("There are ")
Response.Write(c)
Response.Write(" items in the list")
%>

Output:

There are 4 items in the list

GetListIndex 方法

返回在内容链接列表文件中当前文件的索引号。第一个条目的索引号是 1。假如当前页面不在列表文件中,则返回 0。

例子

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetListIndex("links.txt") 
Response.Write("Item number ")
Response.Write(c)
%>

Output:

Item number 3

GetNextDescription 方法

Yan tasiriya na fada na karshe a kanauwa kusa a fada "links.txt". Kuma yadda a fada "links.txt" kama a yinwada fada na yau, tasiriya na fada na farko a kanauwa.

例子

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetNextDescription("links.txt") 
Response.Write("Next ")
Response.Write("description is: ")
Response.Write(c)
%>

Output: Tasiriya na karshe na: ASP Variables

GetNextURL 方法

Yan URL na fada na karshe a kanauwa kusa a fada "links.txt". Kuma yadda a fada "links.txt" kama a yinwada fada na yau, URL na fada na farko a kanauwa.

例子

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetNextURL("links.txt") 
Response.Write("Next ")
Response.Write("URL is: ")
Response.Write(c)
%>

Output: URL na karshe na: asp_variables.asp

GetNthDescription 方法

Yan tasiriya na fada na N a kanauwa kusa a fada "links.txt".

例子

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetNthDescription("links.txt",3) 
Response.Write("Third ")
Response.Write("description is: ")
Response.Write(c)
%>

Output: Tasiriya na farko na: ASP Variables

GetNthURL 方法

Yan URL na fada na N a kanauwa kusa a fada "links.txt".

例子

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetNthURL("links.txt",3) 
Response.Write("Third ")
Response.Write("URL is: ")
Response.Write(c)
%>

Output: URL na farko na: asp_variables.asp

GetPreviousDescription 方法

Yan yi tasiriya na fada a kanauwa kusa a fada "links.txt". Kuma yadda a fada "links.txt" kama a yinwada fada na yau, tasiriya na fada na farko a kanauwa.

例子

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetPreviousDescription("links.txt") 
Response.Write("Previous ")
Response.Write("description is: ")
Response.Write(c)
%>

Output: Ba a yi tasiriya: ASP Variables

GetPreviousURL 方法

Yan yi URL na a ciki a yinwada a kanauwa kusa a fada "links.txt". Kuma yadda a fada "links.txt" kama a yinwada fada na yau, URL na fada na farko a kanauwa.

例子

<%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink") 
c=nl.GetPreviousURL("links.txt") 
Response.Write("Previous ")
Response.Write("URL is: ")
Response.Write(c)
%>

Output: Previous URL is: asp_variables.asp