dim e as object
Set
?e=CreateObject(
"MSScriptControl.ScriptControl"
)
e.Language?=?
"javascript"
dim d as stringd=?e.Eval(
"encodeURI(‘微软计算机‘)"
) ‘运行javascript脚本的函数
MsgBox?d
MsgBox?e.Eval(
"decodeURI(‘"
?&?d??&?
"‘)"
)
标签:dex post creat bsp key blog 转换 字符串 code
dim e as object
Set
?e=CreateObject(
"MSScriptControl.ScriptControl"
)
e.Language?=?
"javascript"
dim d as stringd=?e.Eval(
"encodeURI(‘微软计算机‘)"
) ‘运行javascript脚本的函数
MsgBox?d
MsgBox?e.Eval(
"decodeURI(‘"
?&?d??&?
"‘)"
)
标签:dex post creat bsp key blog 转换 字符串 code
原文地址:https://www.cnblogs.com/Elcser/p/8401752.html