Latest web development tutorials

ASP Linking Content

Exemples

Essayez - Exemple

Composant Linking Content
Dans ce cas, pour construire une table des matières.

Contenu Composant Linking 2
Cet exemple utilise la liaison de contenu composant entre les pages dans un fichier texte pour naviguer.

ASP composant de liaison de contenu

ASP contenu composants de Lier pour créer un système de navigation rapide et facile!

composant Linking contenu retourne un objet Nextlink qui est utilisé pour maintenir une liste de la page de navigation requise.

grammaire

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

ASP Exemples de contenu Lier

Tout d'abord, nous allons créer un fichier texte - "links.txt":

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

Le fichier texte ci-dessus qui contient la page de navigation requise. Ordre des pages qu'ils doivent être affichées dans le même ordre, et contient une description de chaque nom de fichier (utiliser des onglets pour séparer le nom du fichier et la description).

Remarque: Si vous voulez ajouter des pages à la liste, ou modifier l'ordre des pages dans la liste, alors vous devez faire est de modifier le fichier texte it!Navigation sera mis à jour automatiquement!

Nous créons ensuite un fichier de référence, "nlcode.inc". .inc fichiers entre les pages pour créer un objet Nextlink répertorié dans la "links.txt" dans la navigation.

"Nlcode.inc":

<%
dim nl
Set nl=Server.CreateObject("MSWC.NextLink")
if (nl.GetListIndex("links.txt")>1) then
Response.Write("<a href='" & nl.GetPreviousURL("links.txt"))
Response.Write("'>Previous Page</a>")
end if
Response.Write("<a href='" & nl.GetNextURL("links.txt"))
Response.Write("'>Next Page</a>")
%>

S'il vous plaît placé dans chaque page .asp fichier texte "links.txt" figurant dans la ligne decode: <- fichier #include = "nlcode.inc " ->.Cette ligne de code références code "nlcode.inc" sur chaque page figurant dans le "links.txt" dans la navigation fonctionnera.

La méthode de l'ASP composant de liaison de contenu

方法 描述 实例
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")
%>

输出：

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)
%>

输出：

Item number 3
GetNextDescription 返回在内容链接列表文件中所列的下一个条目的文本描述。如果在列表文件中没有找到当前文件，则返回列表中最后一个页面的文本描述。 <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetNextDescription("links.txt")
Response.Write("Next ")
Response.Write("description is: ")
Response.Write(c)
%>

输出：

Next description is: ASP Variables
GetNextURL 返回在内容链接列表文件中所列的下一个条目的 URL。如果在列表文件中没有找到当前文件，则返回列表中最后一个页面的 URL。 <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetNextURL("links.txt")
Response.Write("Next ")
Response.Write("URL is: ")
Response.Write(c)
%>

输出：

Next URL is: asp_variables.asp
GetNthDescription 返在内容链接列表文件中所列的第 N 个页面的描述信息。 <%
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)
%>

输出：

Third description is: ASP Variables
GetNthURL 返回在内容链接列表文件中所列的第 N 个页面的 URL。 <%
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)
%>

输出：

Third URL is: asp_variables.asp
GetPreviousDescription 返回在内容链接列表文件中所列的前一个条目的文本描述。如果在列表文件中没有找到当前文件，则返回列表中第一个页面的文本描述。 <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetPreviousDescription("links.txt")
Response.Write("Previous ")
Response.Write("description is: ")
Response.Write(c)
%>

输出：

Previous description is: ASP Variables
GetPreviousURL 返回在内容链接列表文件中所列的前一个条目的 URL。如果在列表文件中没有找到当前文件，则返回列表中第一个页面的 URL。 <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetPreviousURL("links.txt")
Response.Write("Previous ")
Response.Write("URL is: ")
Response.Write(c)
%>

输出：

Previous URL is: asp_variables.asp