帮忙写个ASP文件，很简单的

答案:4 悬赏:50 手机版

解决时间 2021-06-02 07:25

提问者网友：最爱你的唇
2021-06-01 22:10

要求是生成一个名为XXX.TXT文件。当再次向该ASP发送信息时，重写XXX.TXT文件。也就是将XXX.TXT文件内容清空后再写入文本。

注：写入的文本必须顶格

要求变量：XXX、文本内容这2个可提交的变量。

最佳答案

五星知识达人网友：零点过十分
2021-06-01 22:34

楼上的回答也可以,不过可能会有编码,路径等问题

<%
Function CreateFile(Saveurl,Content,setcharset)
dim Stm,FileName
FileName = Server.MapPath(Saveurl)
Set Stm = Server.CreateObject("Adodb.Stream")
with Stm
.Open
.Charset = setcharset
.Position = Stm.Size
.writeText=Content
.SaveToFile FileName,2
.Close
End with
Set Stm = Nothing
End Function

Saveurl="XXX.TXT"
Content="文本内容"
Call CreateFile(Saveurl,Content,"gb2312")
%>

Saveurl 可以是包含路径的如 /createfile/xxx.txt"

Content 可以是包含html代码

全部回答

1楼网友：三千妖杀
2021-06-02 01:37

楼上的回答正确~

2楼网友：鱼忧
2021-06-01 23:59

<%@language="javascript"%> <%

function CreateFile(FileName,Content) { FileName=Server.Mappath(FileName); var FSO = Server.CreateObject("Scripting.FileSystemObject"); var fd=FSO.createtextfile(FileName,true); fd.writeline(Content); } var xxx="fjkdfkajskrfjklajdsfkjdsakur"; var xx="t.txt"; CreateFile(xx,xxx); %>

不用谢，记得踩纳就是了

3楼网友：平生事
2021-06-01 23:26

fso 百度fso生成文件就知道了

我要举报

如以上回答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！

点此我要举报以上问答信息