好吧,自从我使用经典的 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)
本文内容由网友自发贡献,版权归原作者所有,本站不承担相应法律责任。如您发现有涉嫌抄袭侵权的内容,请联系:hwhale#tublm.com(使用前将#替换为@)