<!DOCTYPE html>
<html>
<body>

<p>
以下示例构建了一个目录。
</p>

<%
dim c
dim i
set nl=server.createobject("MSWC.Nextlink")
c = nl.GetListCount("text\links.txt")
i = 1
%>

<ul>
<%do while (i <= c) %>
<li><a href="<%=nl.GetNthURL("text\links.txt", i)%>">
<%=nl.GetNthDescription("text\links.txt", i)%></a>
<%
i = (i + 1)
循环
%>

</ul>
<p>
文本文件包含页面网址的列表
和链接描述。 它包含每页文本的一行。 请注意,网址和
描述 必须 用TAB字符分隔。
</p>
<p>
<a href="text/links.txt"><img src="/images/btn_view_text.gif"></a>
</p>
</body>
</html>