神马品牌网霸道剑灵觉醒升级:请问这一句ASP代码哪个地方有错？
来源：百度文库 编辑：神马品牌网 时间：2024/04/27 18:31:50
<%
set mfo=server.createobject("scripting.filesystemobject")
set mystream=mfo.opentextfile("f:\myasp\test.txt")
mystream.writeline("追加一句试试看")
response.writeline(mystream.readall)
mystream.close
%>
不胜感激。
1.你应该设置opentextfile的打开方式
Const ForReading = 1, ForWriting = 2, ForAppending = 8
set mystream=mfo.opentextfile("f:\myasp\test.txt"，ForWriting，True)
mystream.writeline("追加一句试试看")
2.response.writeline(mystream.readall)要用response.write(mystream.readall)来写
整个前面加上 Set mystream = mfo.OpenTextFile("c:\testfile.txt", ForReading)
这一句应该写成
Set mystream = mfo.OpenTextFile("f:\myasp\test.txt", ForReading)
response.writeline(mystream.readall)
3。我给你修改一下 你看看
Const ForReading = 1, ForWriting = 2
set mfo=server.createobject("scripting.filesystemobject")
set mystream=mfo.opentextfile("f:\myasp\test.txt", ForWriting, True)
mystream.writeline("追加一句试试看")
set mystream=mfo.opentextfile("f:\myasp\test.txt", ForReading)
response.write(mystream.readall)
mystream.close
f:\myasp\test.txt
应该用双斜杠格开