在VBS中执行Javascript语句

一直想写一个VBS版的六维空间作弊程序，无奈没有找到现成的VBS版Sha1函数，也许是VBS没有位操作符的缘故吧。而JavaScript版的早已实现，然后就想能不能在VBS中执行JavaScript代码，这样就可以变相实现了，当时知道的方法是WSC文件，但是我不喜欢额外的文件，只好作罢。最近偶然发现一个MSScriptControl.ScriptControl对象，可以实现这个功能，简单的示例如下，更高级的用法自己查阅帮助文档。

Dim sc
Set sc = CreateObject("MSScriptControl.ScriptControl")
sc.Language = "JScript"
result = sc.Eval("encodeURIComponent('恶魔');")
WScript.Echo result

随机文章:

1. VBS调用Windows API函数
2. 批处理技术内幕：ECHO命令
3. 又遇VBS中&H前缀十六进制数的陷阱
4. 再谈CreateObject函数，VBS到底能调用哪些对象？
5. 吞噬者批处理编写器

这篇文章发布于 2010年08月21日，星期六，01:57，归类于 程序设计。 您可以跟踪这篇文章的评论通过 RSS 2.0 feed。 您可以留下评论，或者从您的站点trackback。