part2.asp

来自「《动态网页设计基础教程》,胡杰,科学出版社」· ASP 代码 · 共 30 行

ASP
30
字号
<HTML>
<HEAD><TITLE>第2步</TITLE></HEAD>
<BODY>
第二部分 概要设计
<BR>
<%
Dim xLinks
  Set xlinks=Server.CreateObject("MSWC.NextLink")
  If xlinks.getlistindex("catalog.txt")>1  then
  %>
<a href="<%=xlinks.getpreviousurl("catalog.txt")%>"> 
  上一页 
  </a>
<% End if
   if xlinks.getlistindex("catalog.txt")<xlinks.getlistcount("catalog.txt") then %>
   &nbsp;&nbsp; 
<a href="<%=xlinks.getnexturl("catalog.txt")%>">
  下一页
   </a>
<% End if %>&nbsp;&nbsp; 
<a href="<%=xlinks.getnthurl("catalog.txt",1)%>">
   返回首页
   </a>
</BODY>
</HTML>




⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?