我正在尝试将一些中文字符写入文本文件,使用
Set myFSO = CreateObject("Scripting.FileSystemObject")
Set outputFile = myFSO.OpenTextFile(getOutputName(Argument, getMsiFileName(Wscript.Arguments)), forWriting, True)
outputFile.WriteLine(s)
变量s
包含我从其他文件读取的汉字。我回显了 s
值,我可以在屏幕上正确地看到 s。但是,由于某种原因,脚本在 outputFile.WriteLine(s)
之后停止运行,没有返回任何错误消息。
我错过了什么吗?
最佳答案
可能与字符编码有关。尝试在 OpenTextFile
方法的最后一个参数中直接指定文件的 Unicode 格式:
Const Unicode = -1
Set outputFile = myFSO.OpenTextFile(getOutputName(Argument, getMsiFileName(Wscript.Arguments)), forWriting, True, Unicode)
此外,您需要在写入后关闭文件:
outputFile.Close
如果这没有帮助,请尝试像 AnthonyWJones suggested 这样的错误处理.
关于string - 使用vbscript将汉字写入文本文件,我们在Stack Overflow上找到一个类似的问题: https://stackoverflow.com/questions/2232714/