📄 browsestory.asp
字号:
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>浏览小故事</title>
</head>
<body>
<%
SET myfs=server.createobject("scripting.filesystemobject")
if myfs.FileExists("e:\story.txt") then
set mytf=myfs.OpenTextFile("e:\story.txt",1)
While not mytf.AtEndOfStream
text=mytf.ReadLine
Response.Write(" " & text & "<BR>")
Wend
mytf.Close
else
%>
<hr>
<h3>
搜索不到故事！
</h3>
</hr>
<%
end if
%>
<p align="right">
<a href="story.htm">返回</a>
</p>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -