VBA如何对URL中的汉字编码？？
在JS中，使用url来向web server请求的时候，需要用encodeURI来对其中的汉字进行编码，否则会出乱码。
VBA中有没有相应的函数？

[解决办法]
不知可是这个：
Public Function Escape(ByVal strText As String) As String
Set JS = CreateObject("msscriptcontrol.scriptcontrol")
JS.Language = "JavaScript"
Escape = JS.Eval("encodeURI('" & Replace(strText, "'", "\'") & "');")
End Function

错了莫怪，我是菜鸟
[解决办法]
这个函数，我是在excelhome看到的。
在VBA中好用。
[解决办法]
VBA中自己没有encodeURI类似功能的函数，上述
Function Escape是移花接木，但好用。