Przykłady
Komponent Content Linking
Tworzenie spisu treści.
Content Linking Komponent 2
Użyj Content Linking komponent do nawigacji między stronami w pliku tekstowym.
Komponent ASP Content Linking
Treść elementem łączącym ASP jest używany do tworzenia szybki i łatwy system nawigacji!
Element łączący Content zwraca obiekt nextlink, który jest używany do przechowywania listy stron internetowych należy poruszać.
Składnia
<%
Set nl=Server.CreateObject("MSWC.NextLink")
%>
Zawartość ASP Łączenie Przykład
Najpierw tworzymy plik tekstowy - "links.txt" :
asp_intro.asp ASP Intro
asp_syntax.asp ASP Syntax
asp_variables.asp ASP Variables
asp_procedures.asp ASP Procedures
Plik zawiera tekst powyżej strony należy poruszać. Strony muszą być w tej samej kolejności chcesz je mają być wyświetlane, i to musi również zawierać opis każdej nazwy pliku (use the tab key to separate file name from description) .
Note: Jeśli chcesz dodać stronę lub zmienić kolejność stron w wykazie; trzeba tylko zmodyfikować plik tekstowy! Nawigacja zostanie automatycznie poprawione!
Następnie tworzymy plik include, "nlcode.inc" . Plik .inc tworzy obiekt nextlink do nawigacji między stronami wymienionych w "links.txt" .
"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>")
%>
W każdej z tych stron asp wymienionych w pliku tekstowym "links.txt" , umieścić jedną linię kodu: <!-- #include file="nlcode.inc"--> . Linia ta będzie zawierać kod w "nlcode.inc" na każdej stronie wymienionego w "links.txt" a nawigacja będzie działać.
Metody ASP Zawartość powiązanie komponentu
metoda | Opis | Przykład |
---|---|---|
GetListCount | Zwraca liczbę elementów wymienionych w pliku listy Content Linking | <% 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 | Zwraca numer indeksu bieżącego elementu w treści pliku listy z linkami. Numer indeksu pierwszego elementu to 1. 0 jest zwracany, jeśli bieżąca strona nie jest w treści Łączenie pliku listy | <% 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 | Zwraca opis tekstowy następnego elementu wymienionego w treści pliku listy z linkami. Jeśli bieżąca strona nie znajduje się w pliku listy zwraca opis tekstowy ostatniej strony na liście | <% 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 | Zwraca adres URL następnego elementu wymienionego w treści pliku listy z linkami. Jeśli bieżąca strona nie znajduje się w pliku listy zwraca adres URL ostatniej strony na liście | <% 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 | Zwraca opis Nth stronie wymienionej w pliku listy Content Linking | <% 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 | Zwraca URL Nth stronie wymienionej w spisie pliku linkami | <% 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 | Zwraca tekstowy opis poprzedniej pozycji wymienionych w treści pliku listy z linkami. Jeśli bieżąca strona nie znajduje się w pliku listy zwraca opis tekstowy pierwszej strony na liście | <% 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 | Zwraca adres URL poprzedniej pozycji wymienionych w treści pliku listy z linkami. Jeśli bieżąca strona nie znajduje się w pliku listy zwraca adres URL pierwszej strony na liście | <% 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 |