Vbscript 将字符串转换为UTF-8

我为编码为ansi的变量分配了一个字符串，例如

str=“ПццΓ”

---

如何将其编码为UTF-8？

您的意思是在将其写入文件时？像这样：

Set stream = CreateObject("ADODB.Stream")
stream.Open
stream.Type     = 2 'text
stream.Position = 0
stream.Charset  = "utf-8"
stream.WriteText str
stream.SaveToFile filename, 2
stream.Close

编辑：如果希望UTF-8字符串进入另一个变量，可以这样做：

Set stream = CreateObject("ADODB.Stream")
stream.Open
stream.Type     = 2 'text
stream.Position = 0
stream.Charset  = "utf-8"
stream.WriteText str
stream.Flush
stream.Position = 0
stream.Type     = 1 'binary
stream.Read(3)      'skip BOM
utfStr = stream.Read
stream.Close

---

不，我不想写入文件。我将这个变量传递给URL到只接受utf-8编码字符串的服务器。例如，如果我对字符串进行URL编码，或使用

Escape（）

函数，服务器将返回错误状态。另请参阅。