ASP内置组件(10)

原作者:admin 添加时间:2007-07-23 原文发表:2007-07-23 人气:8 来源：www

本文章共5990字，分12页，当前第10页，快速翻页：

-----------------------------------------------------------------------------------------------------------------------------------------------

本文提示：《ASP内置组件(10)》是本站编辑们为广大网友精选的实用文章，本文阐述了关于文章的相关理论，相对来说专业性强，但是本文只是针对于某个问题提出的见解与论述，未必能辐射到相关问题的方方面面，所以本文处理问题的方法仅仅为您提供一些参考。更多问题请查阅学习中国网其他栏目哦.

-----------------------------------------------------------------------------------------------------------------------------------------------

'获取文件 urllist.txt 中链接数目
Count = NextLink.GetListCount("urllist.txt")

Dim url, Dscr, I
For I = 1 To Count
url = NextLink.GetNthURL ("urllist.txt", I)           '取得超链接
Dscr = NextLink.GetNthDescription ("urllist.txt", I)  '取得文字描述
Response.Write "<li><a href = """ & url & """>" & Dscr & "</a>" & vbcrlf
Next
%>
</ul></body></html>
然后，以wuf28.asp为例说明如何自动实现上一章和下一章跳转。
<% @LANGUAGE = VBScript %>
<% Option Explicit %>
<html><head><title>这个链接要注意</title></head>
<body>

<p>这里是第 2 章的正文............</p>

<% '每个文件都包含下面这句, 就实现了自动链接%>

</body></html>
这里最后一句加上去就可以实现自动跳转，核心在wuf29.asp中。

本文章更多内容：<<上一页 - 1 - 2 - 3 - 4 - 5 - 6 - 7 - 8 - 9 - 10 - 11 - 12 - 下一页>>

本页地址