
<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>