📄 4-3-4.asp
字号:
<%
'创建内容连接组件
Set mylinks=Server.CreateObject("MSWC.NextLink")
%>
<HTML>
<HEAD><TITLE>讨论组主页</TITLE></HEAD>
<BODY>
发布信息数：<%=Mylinks.GetListCount("news.txt") %>
<hr>
[<a href="4-3-1.htm"> 发布新文章</a>]
<UL>
<%
'显示信息列表
For i=1 to mylinks.GetListCount("news.txt")
%>
<LI>
<a href="<%=mylinks.GetNthURL("news.txt",i)%>">
<%=mylinks.GetNthDescription("news.txt",i)%></a>
<%
next
%>
</ul>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -