ASP Content Linking Component

Halimbawa

Content Linking Komponen
Ang halimbawa na ito ay magtatayo ng isang listahan ng nilalaman.
Content Linking Komponen 2
Ang halimbawa na ito ay gumagamit ng Content Linking na komponen para sa pagnavigasyon sa pagitan ng pahina na nakalista sa teksto na file.

ASP Content Linking Component

Ang ASP Content Linking na komponen ay ginagamit para gumawa ng madali at madaling naglalakbay na sistema ng pagnavigasyon.

Ang Content Linking na komponen ay ibibigay ng isang Nextlink na obhektong ginagamit para mapag-alaala ang listahan ng pahina na dapat nandaliin.

Mga Tagapagsanay

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

Unang, gagawa namin ng teksto na file - "links.txt". Ang file na ito ay naglalaman ng impormasyon ng pahina na dapat nandaliin. Ang pagkakatala ng pahina ay dapat magkapareho sa kanilang pagpapakita, at mayroon ding paglalarawan ng bawat file (ginagamit ang tab para sa paghihiwalay ng pangalang file at impormasyon ng paglalarawan).

Komento:Kung gusto mong idagdag ang impormasyon ng file sa listahan o baguhin ang pagkakabanggit ng pahina sa listahan, ang lahat na kailangan mong gawin ay baguhin lamang ang tekstdong file! Pagkatapos, ang sistema ng paglalakbay ay mag-ayos ng awtomatiko!

"links.txt":

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

Maglagay ng linya na ito sa ibabaw ng naibahagi sa ibabaw ng pahina: <!-- #include file="nlcode.inc"-->. Ang linya na ito ay maglalaman ng bawat pahina sa "links.txt", kaya maisasagawa ang paglalakbay.

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

Mga paraan ng Komponen ng ASP Content Linking

GetListCount 方法

Naglalaman ng bilang ng mga nilalaman na nasa listahan ng link ng nilalaman:

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

ការបញ្ចេញ:}}

Mayroong 4 item sa listahan

GetListIndex 方法

Naglalaman ng index ng kasalukuyang file sa listahan ng link ng nilalaman. Ang index ng unang entri ay 1. Kung ang kasalukuyang pahina ay hindi nasa listahan ng file, ibabalik ang 0.

ឧទាហរណ៍

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

ការបញ្ចេញ:}}

លេខក្នុងបញ្ជី 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)
%>

ការបញ្ចេញ: ការពន្យល់បន្ទាប់ គឺ: 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)
%>

ការបញ្ចេញ: URL បន្ទាប់ គឺ: 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)
%>

ការបញ្ចេញ: ការពន្យល់ទីបី គឺ: ASP Variables

វិធីសាស្រ្ត GetNthURL

ទទួលបាន URL របស់ទំព័រទី N ដែលត្រូវបានចុះឈ្មោះនៅក្នុងឯកសារតាមផ្លូវភាពបណ្តាញ ។

ឧទាហរណ៍

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

ការបញ្ចេញ: URL ទីបី គឺ: 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)
%>

ការបញ្ចេញ: ការពន្យល់មុនៗ គឺ: 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)
%>

Output: Previous URL is: asp_variables.asp