contoh
The Menghubungkan Komponen Konten
Membangun daftar isi.
Konten Menghubungkan Komponen 2
Gunakan Content Menghubungkan Komponen untuk menavigasi antara halaman dalam file teks.
ASP Konten Menghubungkan Komponen
ASP Konten komponen Menghubungkan digunakan untuk membuat sistem navigasi cepat dan mudah!
Konten Menghubungkan komponen mengembalikan sebuah objek Nextlink yang digunakan untuk menyimpan daftar halaman Web yang akan berlayar.
Sintaksis
<%
Set nl=Server.CreateObject("MSWC.NextLink")
%>
ASP Konten Menghubungkan Contoh
Pertama kita membuat file teks - "links.txt" :
asp_intro.asp ASP Intro
asp_syntax.asp ASP Syntax
asp_variables.asp ASP Variables
asp_procedures.asp ASP Procedures
File teks di atas berisi halaman yang akan berlayar. Halaman harus terdaftar dalam urutan yang sama Anda ingin mereka untuk ditampilkan, dan juga harus berisi deskripsi untuk setiap nama file (use the tab key to separate file name from description) .
Note: Jika Anda ingin menambahkan halaman, atau mengubah urutan halaman dalam daftar; Anda hanya perlu memodifikasi file teks! navigasi otomatis akan diperbaiki!
Kemudian kita membuat include file, "nlcode.inc" . File inc membuat objek NextLink untuk menavigasi antara halaman yang tercantum dalam "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>")
%>
Dalam setiap halaman asp tercantum dalam file teks "links.txt" , menempatkan satu baris kode: <!-- #include file="nlcode.inc"--> . Baris ini akan menyertakan kode di "nlcode.inc" pada setiap halaman yang tercantum dalam "links.txt" dan navigasi akan bekerja.
Metode ASP Konten Menghubungkan Komponen ini
metode | Deskripsi | Contoh |
---|---|---|
GetListCount | Mengembalikan jumlah item yang tercantum dalam Konten Menghubungkan berkas Daftar | <% 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 | Mengembalikan jumlah indeks dari item saat ini di Konten berkas Menghubungkan Daftar. Nomor indeks item pertama adalah 1. 0 dikembalikan jika halaman saat ini tidak dalam Konten Menghubungkan berkas Daftar | <% 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 | Mengembalikan deskripsi teks dari item berikutnya yang tercantum dalam Konten berkas Menghubungkan Daftar. Jika halaman saat ini tidak ditemukan dalam daftar file itu mengembalikan deskripsi teks dari halaman terakhir dalam daftar | <% 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 | Mengembalikan URL dari item berikutnya yang tercantum dalam Konten berkas Menghubungkan Daftar. Jika halaman saat ini tidak ditemukan dalam daftar file itu mengembalikan URL dari halaman terakhir dalam daftar | <% 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 | Mengembalikan deskripsi halaman N tercantum dalam Konten Menghubungkan berkas Daftar | <% 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 | Mengembalikan URL dari halaman N tercantum dalam Konten Menghubungkan berkas Daftar | <% 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 | Mengembalikan deskripsi teks dari item sebelumnya tercantum dalam Konten berkas Menghubungkan Daftar. Jika halaman saat ini tidak ditemukan dalam daftar file itu mengembalikan deskripsi teks dari halaman pertama pada daftar | <% 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 | Mengembalikan URL dari item sebelumnya tercantum dalam Konten berkas Menghubungkan Daftar. Jika halaman saat ini tidak ditemukan dalam daftar file itu mengembalikan URL dari halaman pertama pada daftar | <% 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 |