VB6, 如何将字符串转换成网址编码
比如将字符串"眼贴"转换成网址编码后,结果是%E7%9C%BC%E8%B4%B4,请问%E7%9C%BC%E8%B4%B4是如何转换而得的?这种是Utf-8编码,使用如下...
比如 将字符串"眼贴"转换成网址编码后,结果是%E7%9C%BC%E8%B4%B4,
请问%E7%9C%BC%E8%B4%B4是如何转换而得的?
这种是Utf-8编码,使用如下代码即可:
dim e as object
Set e=CreateObject("MSScriptControl.ScriptControl")
e.Language = "javascript"
dim d as string
d= e.Eval("encodeURI('眼贴)") '编码
MsgBox e.Eval("decodeURI('" & d & "')") ‘解码 展开
请问%E7%9C%BC%E8%B4%B4是如何转换而得的?
这种是Utf-8编码,使用如下代码即可:
dim e as object
Set e=CreateObject("MSScriptControl.ScriptControl")
e.Language = "javascript"
dim d as string
d= e.Eval("encodeURI('眼贴)") '编码
MsgBox e.Eval("decodeURI('" & d & "')") ‘解码 展开
1个回答
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询