<%
dim filename,fso,f
filename="test.txt"
Set fso = CreateObject("Scripting.FileSystemObject")
set f=fso.CreateTextFile(filename,true)
f.close
response.Write "创建成功"
%>
在本机测试,出现错误,不能创建文件。
错误类型: Microsoft VBScript runtime (0x800A0046) Permission denied