ASP Content Linking ਘੜੀ

ਉਦਾਹਰਣ

Content Linking ਕੰਪੋਨੈਂਟ
ਇਸ ਉਦਾਹਰਣ ਵਿੱਚ, ਇੱਕ ਸਮੱਗਰੀ ਸੂਚੀ ਬਣਾਈ ਜਾਵੇਗੀ。
Content Linking ਕੰਪੋਨੈਂਟ 2
ਇਸ ਉਦਾਹਰਣ ਵਿੱਚ, Content Linking ਕੰਪੋਨੈਂਟ ਨੂੰ ਇੱਕ ਲਿਖਤ ਫਾਈਲ ਵਿੱਚ ਸੂਚੀਬੱਧ ਪੰਨਿਆਂ ਵਿੱਚ ਨੇਵੀਗੇਟ ਕਰਨ ਲਈ ਵਰਤਿਆ ਜਾਂਦਾ ਹੈ。

ASP Content Linking ਘੜੀ

ASP Content Linking ਕੰਪੋਨੈਂਟ ਨੂੰ ਸੁਵਿਧਾਜਨਕ ਨੇਵੀਗੇਸ਼ਨ ਸਿਸਟਮ ਬਣਾਉਣ ਲਈ ਵਰਤਿਆ ਜਾਂਦਾ ਹੈ。

Content Linking ਕੰਪੋਨੈਂਟ ਇੱਕ Nextlink ਆਬਜੈਕਟ ਵਾਪਸ ਦੇਵੇਗਾ, ਇਹ ਆਬਜੈਕਟ ਨੇਵੀਗੇਟ ਕਰਨ ਵਾਲੇ ਵੈੱਬ ਪੰਨਿਆਂ ਦੀ ਸੂਚੀ ਨੂੰ ਰੱਖਣ ਲਈ ਵਰਤਿਆ ਜਾਂਦਾ ਹੈ。

ਵਿਆਕਰਣ

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

ਪਹਿਲਾਂ, ਅਸੀਂ ਲਿਖਤ ਫਾਈਲ - "links.txt" ਬਣਾਵਾਂਗੇ। ਇਹ ਫਾਈਲ ਨੇਵੀਗੇਟ ਕਰਨ ਵਾਲੀਆਂ ਪੰਨਿਆਂ ਦੇ ਸੂਚਨਾ ਨੂੰ ਸਮਾਵੇਗੀ। ਪੰਨਿਆਂ ਦੀ ਕਰਜ਼ਾ ਕਰਨ ਦੀ ਕਿਸਮ ਨੂੰ ਉਨ੍ਹਾਂ ਦੀ ਪ੍ਰਦਰਸ਼ਨ ਕਰਨ ਵਾਲੀ ਕਿਸਮ ਨਾਲ ਸਮਾਨ ਹੋਣੀ ਚਾਹੀਦੀ ਹੈ, ਅਤੇ ਹਰ ਫਾਈਲ ਦੇ ਵਰਣਨ (ਫਾਈਲ ਨਾਮ ਅਤੇ ਵਰਣਨ ਸੂਚਨਾ ਨੂੰ ਟੈਬ ਨਾਲ ਵੰਡ ਕੇ) ਸ਼ਾਮਲ ਹੋਣਾ ਚਾਹੀਦਾ ਹੈ。

ਟਿੱਪਣੀ:ਜੇਕਰ ਤੁਸੀਂ ਲਿਸਟ ਵਿੱਚ ਫਾਈਲ ਸੂਚਨਾ ਜੋੜਣਾ ਚਾਹੁੰਦੇ ਹੋ ਜਾਂ ਸੂਚੀ ਵਿੱਚ ਪੇਜਜ਼ ਦੀ ਕਿਸਮ ਬਦਲਣਾ ਚਾਹੁੰਦੇ ਹੋ ਤਾਂ ਤੁਹਾਨੂੰ ਇਹੀ ਕਰਨਾ ਚਾਹੀਦਾ ਹੈ! ਤਾਕਿ ਨੇਵੀਗੇਸ਼ਨ ਸਿਸਟਮ ਆਪਣੇ ਆਪ ਨੂੰ ਅੱਪਡੇਟ ਕਰੇਗਾ!

"links.txt":

asp_intro.asp ASP ਇੰਟਰੋ
asp_syntax.asp ASP ਸਿੰਕਸ
asp_variables.asp ASP ਵੈਰੀਅਬਲ
asp_procedures.asp ASP ਪ੍ਰੋਸੇਡਿਊਰ

ਉੱਤੇ ਦਿੱਤੀ ਗਈ ਪੇਜ਼ਾਂ ਵਿੱਚ ਇਹ ਕੋਡ ਲਗਾਓ: <!-- #include file="nlcode.inc"-->। ਇਹ ਕੋਡ "links.txt" ਵਿੱਚ ਹਰ ਪੇਜ਼ 'ਤੇ ਨਿਚੇ ਦਿੱਤੇ ਕੋਡ ਦਾ ਹਵਾਲਾ ਦੇਵੇਗਾ, ਤਾਕਿ ਨੇਵੀਗੇਸ਼ਨ ਕੰਮ ਕਰ ਸਕੇ।

"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("'>ਪਿਛਲਾ ਪੇਜ਼</a>")
end if
Response.Write("<a href='" & nl.GetNextURL("links.txt"))
Response.Write("'>ਅਗਲਾ ਪੇਜ਼</a>")
%>

ASP Content Linking ਕੰਪੋਨੈਂਟ ਦੇ ਮੱਥਦ

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

ਆਉਟਪੁੱਟ：}}

ਲਿਸਟ ਵਿੱਚ 4 ਆਈਟਮ ਹਨ

GetListIndex ਮੱਥਦ

ਮੌਜੂਦਾ ਲਿੰਕ ਸੂਚੀ ਫਾਈਲ ਵਿੱਚ ਸਰਕਾਰੇ ਇੰਡੈਕਸ ਦਿੱਤਾ ਜਾਵੇਗਾ। ਪਹਿਲੇ ਪ੍ਰਵਾਨ ਦਾ ਇੰਡੈਕਸ 1 ਹੈ। ਜੇਕਰ ਮੌਜੂਦਾ ਪੇਜ਼ ਸੂਚੀ ਫਾਈਲ ਵਿੱਚ ਨਹੀਂ ਹੈ ਤਾਂ 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 ਵਰਗ

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 ਮੈਥਡ

ਸਮੱਗਰੀ ਲਿੰਕ ਸੂਚੀ ਫਾਇਲ ਵਿੱਚ ਦਿਖਾਈ ਵਾਲੇ ਕ੍ਰਮਵਾਰ ਪੰਨੇ ਦਾ ਵਰਣਨ ਵਾਪਸ ਦਿੰਦਾ ਹੈ。

ਉਦਾਹਰਣ

<%
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 ਵਰਗ

GetNthURL ਮੈਥਡ

ਸਮੱਗਰੀ ਲਿੰਕ ਸੂਚੀ ਫਾਇਲ ਵਿੱਚ ਦਿਖਾਈ ਵਾਲੇ ਕ੍ਰਮਵਾਰ ਪੰਨੇ ਦਾ 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)
%>

ਆਉਟਪੁੱਟ: ਤੀਜਾ 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 ਵਰਗ

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

ਆਉਟਪੁਟ: ਪਿਛਲਾ URL ਹੈ: asp_variables.asp