源代码:
<html> <body> <h1> This is page 1! </h1> <FONT COLOR=#ff0000><% Set nl=Server.CreateObject("MSWC.NextLink") If (nl.GetListIndex("text/links2.txt")>1) Then %></FONT> <a href="<FONT COLOR=#ff0000><%Response.Write(nl.GetPreviousURL("text/links2.txt"))%></FONT>">Previous Page</a> <FONT COLOR=#ff0000><%End If%></FONT> <a href="<FONT COLOR=#ff0000><%Response.Write(nl.GetNextURL("text/links2.txt"))%></FONT>">Next Page</a> <p>The example uses the Content Linking Component to navigate between the pages in a text file.</p> <p> <a href="text/links2.txt"><img src="/images/btn_view_text.gif"></a> </p> </body> </html>
运行结果：
<html> <body> <h1> This is page 1! </h1> <FONT COLOR=#ff0000><% Set nl=Server.CreateObject("MSWC.NextLink") If (nl.GetListIndex("text/links2.txt")>1) Then %></FONT> <a href="<FONT COLOR=#ff0000><%Response.Write(nl.GetPreviousURL("text/links2.txt"))%></FONT>">Previous Page</a> <FONT COLOR=#ff0000><%End If%></FONT> <a href="<FONT COLOR=#ff0000><%Response.Write(nl.GetNextURL("text/links2.txt"))%></FONT>">Next Page</a> <p>The example uses the Content Linking Component to navigate between the pages in a text file.</p> <p> <a href="text/links2.txt"><img src="/images/btn_view_text.gif"></a> </p> </body> </html>