Latest web development tutorials

การเชื่อมโยงเนื้อหา ASP

ตัวอย่าง

ลอง - ตัวอย่าง

เนื้อหาตัวแทนการเชื่อมโยง
ในกรณีนี้จะสร้างตารางของเนื้อหา

เนื้อหาตัวแทนการเชื่อมโยง 2
ตัวอย่างนี้ใช้องค์ประกอบการเชื่อมโยงเนื้อหาระหว่างหน้าในแฟ้มข้อความเพื่อนำทาง

ASP ตัวแทนการเชื่อมโยงเนื้อหา

ASP ส่วนประกอบการเชื่อมโยงเนื้อหาสำหรับการสร้างระบบนำทางง่ายและรวดเร็ว!

เนื้อหาเชื่อมโยงองค์ประกอบที่ส่งกลับวัตถุ Nextlink ที่ใช้ในการเก็บรายชื่อของหน้านำทางต้อง

ไวยากรณ์

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

ASP ตัวอย่างเนื้อหาที่เชื่อมโยง

ครั้งแรกที่เราจะสร้างไฟล์ข้อความ - "links.txt":

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

แฟ้มข้อความข้างต้นที่มีหน้านำทางที่จำเป็น เพื่อหน้าพวกเขาควรจะแสดงในลำดับเดียวกันและมีคำอธิบายของแต่ละชื่อไฟล์ A (การใช้งานแท็บจะแยกชื่อไฟล์และคำอธิบาย)

หมายเหตุ: หากคุณต้องการที่จะเพิ่มหน้าไปยังรายการหรือเปลี่ยนลำดับหน้าในรายการแล้วคุณต้องทำคือการแก้ไขไฟล์ข้อความมัน!นำร่องจะมีการปรับปรุงโดยอัตโนมัติ!

จากนั้นเราจะสร้างไฟล์อ้างอิง "nlcode.inc" .inc ไฟล์ระหว่างหน้าเพื่อสร้างวัตถุ NextLink ระบุไว้ใน "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>")
%>

โปรดวางไว้ในแต่ละไฟล์หน้า .asp ข้อความ "links.txt"ระบุไว้ในบรรทัดของรหัส: <- ไฟล์ #include = "nlcode.inc !" ->บรรทัดนี้อ้างอิงรหัส "nlcode.inc" รหัสในทุกหน้าอยู่ในส่วน "links.txt" ในการนำทางจะทำงาน

วิธีการของการเชื่อมโยงองค์ประกอบเนื้อหา ASP

方法 描述 实例
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")
%>

输出：

There are 4 items in the list
GetListIndex 返回在内容链接列表文件中当前条目的索引号。第一个条目的索引号是 1。如果当前页面不在内容链接列表文件中，则返回 0。 <%
dim nl,c
Set nl=Server.CreateObject("MSWC.NextLink")
c=nl.GetListIndex("links.txt")
Response.Write("Item number ")
Response.Write(c)
%>

输出：

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

输出：

Next description is: 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)
%>

输出：

Next URL is: 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)
%>

输出：

Third description is: ASP Variables
GetNthURL 返回在内容链接列表文件中所列的第 N 个页面的 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)
%>

输出：

Third URL is: 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)
%>

输出：

Previous description is: 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)
%>

输出：

Previous URL is: asp_variables.asp