8-02.asp

来自「asp开发 asp开发 asp开发 asp开发」· ASP 代码 · 共 10 行

<%
path = Server.MapPath("test.txt")
set MyFileObject = Server.CreateObject("Scripting.FileSystemObject")
set MyTextFile = MyFileObject.CreateTextFile(path)
For i = 0 To 10
	MyTextFile.WriteLine("写入一行！")
Next
MyTextFile.Close()
%>