Question

求一段ASP写入1.TXT的代码。

例如在TXT里面写入三行内容
aaaaaaaaa
bbbbbbbbb
cccccccccc

邮箱75464186@QQ.com

Answer 1

<%
Set Fso = Server.CreateObject("Scripting.FileSystemObject")
FilePath = Server.Mappath("1.txt")
Set FT = Fso.OpenTextFile(FilePath,8,false)
FT.WriteLine("aaaaaaaaa")
FT.WriteLine("bbbbbbbbb")
FT.WriteLine("cccccccccc")
FT.Close
Set FT = nothing
Set Fso = Nothing
%>