Liaison de contenu ASP


tryitimg.gif

Essayez-le - Exemple

Composant de liaison de contenu
Cet exemple crée une liste de contenu.

Content Linking Component 2
Cet exemple utilise le composant Content Linking pour naviguer entre les pages répertoriées dans un fichier texte.

Composant de liaison de contenu ASP

Le composant de liaison de contenu ASP est utilisé pour créer un système de navigation rapide et pratique !

Le composant Content Linking renverra un objet Nextlink, qui est utilisé pour contenir une liste de pages Web sur lesquelles il faut naviguer.

Syntaxe

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

Exemple de liaison de contenu ASP

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

asp_intro.asp Introduction à ASP
asp_syntax. asp Syntaxe ASP
asp_variables.asp Variables ASP
asp_procedures.asp Procédure ASP

Le fichier texte ci-dessus contient les pages qui doivent être parcourues. Les pages doivent être organisées dans le même ordre dans lequel elles apparaissent et contenir une description de chaque nom de fichier (utilisez des onglets pour séparer les noms de fichiers et les informations de description).

Remarque : Si vous souhaitez ajouter des pages à la liste, ou modifier l'ordre des pages dans la liste, il vous suffit de modifier ce fichier texte ! La navigation se mettra à jour automatiquement !

Ensuite nous créons un fichier de référence, "nlcode.inc". Le fichier .inc crée un objet NextLink pour naviguer entre les pages répertoriées dans « links.txt ».

"nlcode.inc":

<%
dim nl
Set nl=Server.CreateObject("MSWC.NextLink")
if ( nl.GetListIndex("links.txt")>1) puis
Response.Write("<a href='" & nl.GetPreviousURL("links.txt"))
Response.Write(" '>Page précédente</a>")
end if
Response.Write("<a href='" & nl.GetNextURL("links.txt"))
Response.Write( "'>Page suivante</a>")
%>

Veuillez placer une ligne de code dans chaque page .asp répertoriée dans le fichier texte "links.txt": <!-- #include file="nlcode.inc"-->. Cette ligne de code listera le code dans "nlcode.inc" qui est référencé sur chaque page dans "links.txt" afin que la navigation puisse fonctionner.

Méthodes du composant de liaison de contenu ASP

MéthodeDescriptionInstance
GetListCountRenvoie le nombre d'éléments répertoriés dans le fichier de liste de liens de contenu. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetListCount("links.txt")
Response.Write("Il y a")
Response.Write(c)
Response.Write("éléments dans la liste")
%>

Sortie :

Là y a 4 éléments dans la liste

GetListIndex renvoie le numéro d'index de l'élément actuel dans le fichier de liste de liens de contenu. Le numéro d'index de la première entrée est 1. Renvoie 0 si la page actuelle ne figure pas dans le fichier de liste de liens de contenu. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetListIndex("links.txt")
Response.Write("Numéro d'élément")
Response.Write(c)
%>

Sortie :

Numéro d'élément 3

GetNextDescriptionRenvoie la description textuelle de l'élément suivant répertorié dans le fichier de liste de liens de contenu. Si le fichier actuel n'est pas trouvé dans le fichier de liste, une description textuelle de la dernière page de la liste est renvoyée. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetNextDescription("links.txt")
Response.Write("Next")
Response.Write("description est : ")
Response.Write(c)
%>

Sortie :

La description suivante est : Variables ASP

GetNextURL Renvoie l'URL de l'entrée suivante répertoriée dans le fichier de liste de liens de contenu. Si le fichier actuel n'est pas trouvé dans le fichier liste, l'URL de la dernière page de la liste est renvoyée. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetNextURL("links.txt")
Response.Write("Suivant")
Response.Write("L'URL est : ")
Response.Write(c)
%>

Sortie :

L'URL suivante est : asp_variables.asp

GetNthDescriptionRenvoie les informations de description de la Nième page répertoriée dans le fichier de liste de liens de contenu. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetNthDescription("links.txt",3)
Response.Write("Third")
Response.Write("description est : ")
Response.Write(c)
%>

Sortie :

Troisième la description est : Variables ASP

GetNthURLRenvoie l'URL de la Nième page répertoriée dans le fichier de liste de liens de contenu. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetNthURL("links.txt",3)
Response.Write("Third")
Response.Write("L'URL est : ")
Response.Write(c)
%>

Sortie :

Troisième L'URL est : asp_variables.asp

GetPreviousDescriptionRenvoie la description textuelle de l'élément précédent répertorié dans le fichier de liste de liens de contenu. Si le fichier actuel n'est pas trouvé dans le fichier de liste, une description textuelle de la première page de la liste est renvoyée. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetPreviousDescription("links.txt")
Response.Write("Précédent")
Response.Write("description est : ")
Response.Write(c)
%>

Sortie :

La description précédente est : Variables ASP

GetPreviousURLRenvoie l'URL de l'entrée précédente répertoriée dans le fichier de liste de liens de contenu. Si le fichier actuel n'est pas trouvé dans le fichier liste, l'URL de la première page de la liste est renvoyée. <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetPreviousURL("links.txt")
Response.Write("Précédent")
Response.Write("L'URL est : ")
Response.Write(c)
%>

Sortie :

L'URL précédente est : asp_variables.asp