Question

运行ASP程序,出现Microsoft VBScript 运行时错误 错误 '800a0005',无效的过程调用或参数

我自己做了IIS服务器,里面传了个文件1.asp,,代码如下:
<%
if request("c")<>"" then
set fs=createobject("scripting.filesystemobject")
set outfile=fs.OpenTextFile("c:\a.txt",ForWriting,true)
outfile.write request("c")
outfile.close
set fs=nothing
end if
%>
不过当我
提交http:\\192.168.48.128/1.asp?c=hello horizon
提示
Microsoft VBScript 运行时错误 错误 '800a0005'

无效的过程调用或参数
/1.asp，行 4
这为什么不行啊？代码好像没什么问题啊

Answer 1

set outfile=fs.OpenTextFile("c:\a.txt",2,true)
'ForWriting这个在这里是变量，是没有值的
可以这样定义
const ForWriting=2
set outfile=fs.OpenTextFile("c:\a.txt",ForWriting,true)

这样写可能会出现权限问题，前提c:目录允许everybody修改操作
不然你改成2后，这个也可能会出现权限问题，一般都会改网站目录下面的文件

Answer 2

代码似乎是没问题
那看看你的运行环境有没有开启fso组件支持？

Answer 3

ForWriting 是 FSO 的一个常量,但却不是VBS的常量,所以在使用时必须声明常量.否则它会被当作一个没有初始化的变量.
Const ForWriting = 2

Answer 4

看看ForWriting是个啥