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 %>
<a href="<%=xlinks.getnexturl("catalog.txt")%>">
下一页
</a>
<% End if %>
<a href="<%=xlinks.getnthurl("catalog.txt",1)%>">
返回首页
</a>
</BODY>
</HTML>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?