📄 6-9.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>New Page 1</title>
</head>
<body>
<%
'创建一个FileSystemObject的实例
Set MyFileObject=Server.CreateObject("Scripting.FileSystemObject")
'打开一个要进行操作的文件,并选择追加方式 (mode=8)
Set MyTextFile=MyFileObject.OpenTextFile("d:\myweb\MyLog.log",8,true)
'在文件中追加字符串,如果没有的话,这添加一个分行符。
MyTextFile.WriteLine("您是在&now&来到这里的,欢迎您下次再来,ByeBye!")
Set MyTextFile=MyFileObject.OpenTextFile("d:\myweb\MyLog.log")
"判断是否到了该文件的结尾并依次返回True和False。
While not MyTextFile.AtEndOfStream
Response.Write(MyTextFile.ReadLine)
Wend
MyTextFile.Close
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -