小编Mel*_*uza的帖子

如何在VBScript中创建UTF-16文件?

我的系统是Window 10 English-US.我需要将一些不可打印的ASCII字符写入文本文件.因此,例如对于ASCII值为28,我想将\ u001Cw写入文件.在用Java编码时,我不需要做任何特殊的事情.以下是我在VBS中的代码

Dim objStream
Set objStream = CreateObject("ADODB.Stream")
objStream.Open
objStream.Type = 2
objStream.Position = 0
objStream.CharSet = "utf-16"

objStream.WriteText ChrW(28)  'Need this to appear as \u001Cw in the output file

objStream.SaveToFile "C:\temp\test.txt", 2
objStream.Close
Run Code Online (Sandbox Code Playgroud)

vbscript

1
推荐指数
1
解决办法
506
查看次数

标签 统计

vbscript ×1