<%
path=server.MapPath("/")
filename=path & "/" &"test.txt"

set MyFileObject=server.CreateObject("Scripting.FileSystemObject")
set MyTextFile=MyFileObject.CreateTextFile(filename)
MyTextFile.WriteLine("我在当前的目录创建了一个叫test.txt的文件")
MyTextFile.close
%>

源代码就是这个了 运行后是下面的错误


错误类型：
Microsoft VBScript 运行时错误 (0x800A0046)
没有权限
/asp2/4.1.asp, 第 6 行

请问怎么解决？

set MyFileObject=server.CreateObject("Scripting.FileSystemObject")
set MyTextFile=MyFileObject.CreateTextFile(filename,true,false)

还是说没有权限啊

你打开一个文件,首先得设置它是否可写,

如果还是说没权限,你就的右键==>安全选项卡==>把修改的权限给当前文件!

把修改的权限也加了
可是运行后还是哪个错误啊

可以帮忙在你的机子上运行试试下看吗？