“objNextLink.GetListCount("link.txt")”提取link.txt文件中的列表数目
“objNextLink.GetNthURL("link.txt",i)”提取link.txt文件中第i行文本的连接网址
“objNextLink.GetNthDescription("link.txt",i)”提取link.txt文件中第i行文本的连接文本
3,redirect.asp
也就是转向文件了。
<% Response.Clear Response.Redirect Request.QueryString("url") %> |
呵呵,是不是觉得还没用到“上一页”、“下一页”的功能。再来~!
4,link1.txt
1.asp ASP编程入门进阶(一) 2.asp ASP编程入门进阶(二) 3.asp ASP编程入门进阶(三) 4.asp ASP编程入门进阶(四) |
主要功能是设置文本和连接
5,link1.inc
<%Set Nextlink=Server.CreateObject("MSWC.NextLink") Response.write "当前文章索引号为" & NextLink.GetListIndex("link1.txt") & "<br>" Response.write "上一章的标题:" & NextLink.GetPreviousDescription("link1.txt") & "<br>" Response.write "下一章的标题:" & NextLink.GetNextDescription("link1.txt") & "<br>" count = NextLink.GetListCount("link1.txt") Response.write "<a href="""&NextLink.GetNthUrl("link1.txt",1)&"""&>"&"第一章"&"</a> " Response.write "<a href="""&NextLink.GetPreviousUrl("link1.txt")&"""&>"&"上一章"&"</a> " Response.write "<a href="""&NextLink.GetNextUrl("link1.txt")&"""&>"&"下一章"&"</a> " Response.write "<a href="""&NextLink.GetNthUrl ("link1.txt",count)&"""&>"&"最后一章"&"</a><br>" %> |
GetListCount(目标文件名) 显示组件中包含的连接的文件数目。 GetListIndex(目标文件名) 显示当前页在这些连接文件中的前后位置索引值。 GetNextDescription(目标文件名) 显示连接文件中下一个的描述。 GetNextURL(目标文件名) 显示连接文件中的下一个文件的URL地址。 GetNthDescription(目标文件名, N) 显示连接文件中第N个网页的描述。 GetNthURL(目标文件名, N) 显示连接文件中第N个网页的文件URL地址。 GetPreviousDescription(目标文件名) 显示连接文件中前一个文件的描述。 GetPreviousURL(目标文件名) 显示连接文件中前一个文件的URL地址。 |