Question

我正在尝试将一些文本保存到vbscript中的文本文件中，但它不起作用，也没有显示任何错误。这是代码：

sub SaveToFile()
    dim fso, fl
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set fl = fso.OpenTextFile "C:\myFile.txt", 2, True
    fl.Write("blahblah")
    fl.Close : Set fl = Nothing
    Set fso = Nothing
    end sub

我很难发布html代码，所以这里是代码的链接：here

Answer 1

在我看来，你想要将一些内容附加到现有的文本文件中。根据{{3}}，你必须告诉运行时环境你想附加一些东西。如果是这样，则必须使用常量值8而不是2。

Answer 2

假设您在脚本中发布了整个代码：您在那里定义了一个过程，但不要在任何地方调用它。在脚本中添加一行SaveToFile以实际调用该过程。此外，当返回的对象分配给变量时，OpenTextFile的参数列表必须在括号中。书面文本OTOH不应该在parantheses之间（尽管在这种特殊情况下它没有受到伤害）。

Sub SaveToFile()
    Dim fso, fl
    Set fso = CreateObject("Scripting.FileSystemObject")
    Set fl = fso.OpenTextFile("C:\myFile.txt", 2, True)
    fl.Write "blahblah"
    fl.Close
    Set fl = Nothing
    Set fso = Nothing
end sub

SaveToFile

无法使用Vbscript保存到文本文件

2 个答案: