Write Chinese chars to a text file using vbscript

前端 未结 3 1638
爱一瞬间的悲伤
爱一瞬间的悲伤 2021-01-21 03:20

I\'m trying to write some Chinese characters to a text file using

Set myFSO = CreateObject(\"Scripting.FileSystemObject\")
Set outputFile = myFSO.OpenTextFile(ge         


        
3条回答
  •  灰色年华
    2021-01-21 03:38

    Things had changed along win versions. This works on Win10:

    Set outputfile = myFSO.CreateTextFile(filename,True,True)
    

    The 3rd arg is bool true/false for unicode/ascii 2. Surprisingly, when using myFSO.OpenTextFile the arg is int with 1 (not -1) for unicode 1.

    Documentation:

    https://msdn.microsoft.com/en-us/library/aa265018(v=vs.60).aspx

    https://msdn.microsoft.com/en-us/library/aa265347(v=vs.60).aspx

提交回复
热议问题