当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP实例教程:Content Linking组件

ASP
一段ASP 伪静态代码
asp的程序能实现伪静态化的方法
实例讲解实现抓取网上房产信息的ASP程序
[图]Flash+ASP实现电子互动地图在线标注功能
asp下多个域名后缀同时查询的域名查询系统
用ASP实现对ORACLE数据库的操作
用ASP做的DNS LOOKUP程序
用存储过程、GetRows()、抽取10万条数据的速度测试
asp中利用CSW中文分词组件来实现自己网站的内容关键词自动提取
ASP+JS三级联动下拉菜单[调用数据库数据]
用ASP实现距指定日期的倒记时程序源码
详细讲解ASP脚本循环语句
ASP中如何判断一个字符是不是汉字
将ACCESS转化成SQL2000要注意的问题
Microsoft JET Database Engine 错误 ''80004005'' 未指定的错误的完美解决方法
在ASP中使用均速分页法提高分页速度的方法
ASP+COM不得不注意的问题
ASP生成动态flash的工具与介绍
用asp实现的数据库中存取文件的代码
asp的通用数据分页类

ASP实例教程:Content Linking组件


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-28   浏览: 126 ::
收藏到网摘: n/a

Content Linking 组件

本例会构建一个内容列表。

看到本信息说明该文是通过网页教学(www.ruanchen.com)整理发布的,请不要删掉!

本实例代码如下:

 <html>
<body>
<p>下面的例子构建了一个内容列表:</p>
<%
dim c
dim i
set nl=server.createobject("MSWC.Nextlink")
c = nl.GetListCount("/example/aspe/links.txt")
i = 1
%>
<ul>
<%do while (i <= c) %>
<li><a href="<%=nl.GetNthURL("/example/aspe/links.txt", i)%>">
<%=nl.GetNthDescription("/example/aspe/links.txt", i)%></a>
<%
i = (i + 1)
loop
%>
</ul>
<p>文本文件包含页面 URL 的列表和链接描述。
每行文本针对一个页面。
请注意,URL 和描述必须由 TAB 字符分隔。
</p>
<p>
<a href="/example/aspe/links.txt">查看 links.txt</a>
</p>
</body>
</html>

运行结果如下:

下面的例子构建了一个内容列表:
ASP 简介
ASP 语法
ASP 变量
ASP 程序
文本文件包含页面 URL 的列表和链接描述。每行文本针对一个页面。请注意,URL 和描述必须由 TAB 字符分隔。
查看 links.txt

Content Linking 组件 2

本例使用Content Linking 组件在一个文本文件所列的页面间进行导航。

本实例代码如下:

<html>
<body>
<h1>这是页面 1</h1>
<%
Set nl=Server.CreateObject("MSWC.NextLink")
If (nl.GetListIndex("/example/aspe/links2.txt")>1) Then
%>
<a href="<%Response.Write(nl.GetPreviousURL("/example/aspe/links2.txt"))%>">
上一页
</a>
<%End If%>
<a href="<%Response.Write(nl.GetNextURL("/example/aspe/links2.txt"))%>">
下一页
</a>
<p>本例使用 Content Linking 组件
对文本文件中的 URL 进行导航。</p>
<p><a href="/example/aspe/links2.txt">查看 links2.txt</a></p>
</body>
</html>

本实例运行结果如下:

这是页面 1
下一页
本例使用 Content Linking 组件对文本文件中的 URL 进行导航。
查看 links2.txt