无法在经典 asp 中写入文件

好吧，自从我使用经典的 asp 以来已经有一段时间了，所以我有点生疏了。这是我的问题。

我正在尝试使用 FSO 将文件写入文件系统。下面的代码非常简单。但是，该文件没有出现，也没有出现错误。我知道它正在运行代码，因为我可以在此片段之前和之后添加response.writes，并且它们都出现在输出中。但是，没有创建文件，也没有抛出错误。我什至已经改变了它，所以这是一条强制错误的虚假路径。没有骰子。我添加了每个人对目录的读写权限。还是一样。

Ideas?

这是我的代码：

Dim objFSO
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")

'Open the text file
Dim objTextStream
Set objTextStream = objFSO.OpenTextFile("d:\test.txt", True)

'Display the contents of the text file
objTextStream.WriteLine "howdy"

'Close the file and clean up
objTextStream.Close
Set objTextStream = Nothing
Set objFSO = Nothing

该代码不会产生错误消息的唯一可能原因是您的页面中有以下内容：

On Error Resume Next

这很糟糕，因为你刚才已经看到了。它只是默默地忽略任何错误消息，并且让您不知道为什么它没有按预期工作。

（它应该仅用于代码中您预计会出现错误的隔离部分，并在每次操作后实际检查错误情况。）

从您的页面中删除它，您可能收到的错误消息是参数对于此行上的调用无效：

Set objTextStream = objFSO.OpenTextFile("d:\test.txt", True)

你忘记了第二个参数，它是I/O模式。您应该使用值 1 来编写：

Set objTextStream = objFSO.OpenTextFile("d:\test.txt", 1, True)

或者，您可以使用CreateTextFile方法改为：

Set objTextStream = objFSO.CreateTextFile("d:\test.txt", True)