|
Content Linking Prev/Next
filename=/learn/test/cl.asp
<%
Set NL = Server.CreateObject ("MSWC.NextLink")
tocname="/learn/learn.txt"
nextref=NL.GetNextURL(tocname)
nextdes=NL.GetNextDescription(tocname)
If (NL.GetListIndex (tocname)>1) Then
prevref=NL.GetPreviousURL(tocname)
prevdes=NL.GetPreviousDescription(tocname)
%>
Prev:<a href="<%=prevref%>"><%=prevdes%></a> Next:
<% End If %>
<a href="<%=nextref%>"><%=nextdes%></a>
|