Script Control 组件Win7 X64平台运行问题及示例

本文要点：

MSSCRIPT.OCX组件只有x86版本，所以要在x64系统下运行，请使用云盘中的x86版本WScript安装程序。
将以下示例代码存为js文件，将其拖动到x86版本的WScript.exe或CScript.exe程序上即可以运行。
示例 Microsoft Script Control 1.0 的Error和Timeout两个事件的使用。
示例 Microsoft Script Control 1.0 的Run方法，Modules模块集合的使用等等。
另外 Microsoft Script Control 1.0 的中英文参考文档已经转为CHM格式，参考云盘的 MSSCRIPT.chm 等文件。

发现盗贴现象好严重，估计这文章一发表就注定被转抄的命运了，打个标记：By @Jimbowhy @源地址：

http://blog.csdn.net/winsenjiansbomber/article/details/41376999

同时，笔者绝对有理由相信，在文章的添加 mywife.cc 这样的字眼会大大增加本文的浏览量！哈哈：) 也算是对脚本应用的一个普及推广啦！

/* MSSCRIPT.OCX Microsoft Script Control 1.0 is ready for x86 system* it may site in c:\Windows\SysWOW64\msscript.ocx* and must run x86 version WScript.exe to execute this script*/
//var sc = new ActiveXObject("MSScriptControl.ScriptControl");
var sc = WScript.CreateObject("MSScriptControl.ScriptControl","ScriptControl_");
sc.Language = "VBScript";
sc.AllowUI = true;
sc.Timeout = 3000;/* This may occurs 80004005 before Language setted:* The operation could not be completed * because the script engine has not been initialized to a valid language. */
sc.AddObject("WScript", WScript);//sc.addCode('On Error Resume Next'); // add code to Global Module!
//sc.AddCode('x=1/0'); // Execute right now and causes Error event// Delay sub about 5s in my 1.6Ghz 4 Cores CPU, so it will cause 3s Timeout event!
var vbs = 'Sub Main(msg) : For i = 1 to 5000000 Step 1 : x=x+i : Next : MsgBox msg&vbCrLf&"Delay Done:"&i : End Sub';
//sc.Eval(vbs); // Error, just expression to Eval
sc.AddCode(vbs);
sc.Run("Main","Hi, Main");//var vbs = 'Function Main(msg) : MsgBox(msg) : End Function'; // Why not ByVal msg As String?
var vbs = 'Sub Main(msg) : MsgBox("Modules:"+msg) : End Sub'; // just Public not Private member
var m = sc.Modules.Add("Module1");
m.AddCode(vbs);
m.Run("Main","Hi, Main");sc.Language = "JScript";
sc.AddObject("WScript", WScript); // reset when Language changed
sc.AddCode('WScript.Echo("Hi,JS");');/* Events for Script Control* Timeout: Occurs when the time specified in the Timeout property has elapsed, * and a user has selected End from the resulting dialog box. */
function ScriptControl_Timeout(){WScript.Echo("Event: ScriptControl Timeout "+sc.Timeout);
}/* Error: An Error event can occur during event sinking or during a direct call * to the scripting engine when calling into an object returned by the CodeObject * property. The error argument is the number of the run-time error that occurred. */
function ScriptControl_Error(){var msg = "Event: ScriptControl Error " +"\nLine:" + sc.Error.Line +"\nColumn:" + sc.Error.Column +"\nNumber:" + sc.Error.Number +"\nDescription:" + sc.Error.Description;sc.Error.Clear();WScript.Echo(msg);
}

关于Windows Scripting Host这个很实用的古董编程技术，Jimbowhy 收集了大量收藏级的资料，请到云盤免费下载：

http://pan.baidu.com/s/1i3Br5OD

包括：

Advanced VBSript for Microsoft Windows Administrators.pdf
Advanced Windows Script Host Developers Guide (2003) .pdf
IVIEWERS.DLL
Microsoft VBScript Step by Step.pdf
Microsoft Windows脚本技术.CHM
OLEVIEW.EXE
scd56chs.exe JScript & VBScript 官方参考手册 5.6中文版
script56.chm JScript & VBScript 官方参考手册 5.6 e文版
scripten.5.7.0.16535.win2k.exe JScript & VBScript 安装程序
scripten.5.7.0.16535.win2k3 .exe
scripthost20dev.chm Microsoft Windows Script Host 2.0 Developer’s Guide / Günter Born.<
script_repository10.chm System Administration Scripting Guide Script RepositoryVersion 1.0, May 2002
VBScript Programmer's Reference, 3rd Edition.pdf
VBScript程序员参考手册.pdf
VBS_常用脚本.docx
sct10en.exe Microsoft Script Control 1.0
MSSCRIPT.chm Microsoft Script Control 1.0 英文手册的CHM格式
MSSCRIPT-CHS.chm Microsoft Script Control 1.0 中文手册的CHM格式

Script Control 组件Win7 X64平台运行问题及示例相关推荐

win7 x64下安装 KB958559 出现 0x80240037 错误解决方法（win7 x64 安装VB6、Media Studio 8）
想在win7 X64下运行以前的一些32位程序,比如 VB6 .Media Studio Pro 8 等好用的软件,之前在win7 x86下还勉强能安装运行,但是 win7 x64 下是直接连安装都安 ...
Win10系统：VMware workstation 15平台安装win7 X64系统
#[虚拟机安装]Win10系统:VMware workstation 15平台安装win7 X64系统一.Vmware虚拟机平台下载 VMware workstation 软件官方网站下载网址: h ...
intel I7平台Win7 x64 下wpf、silverlight 与aero特效动画缓慢故障排除一则
*貌似是炫耀博?* 卑鄙本周新入一台 inter i7 平台 gts250 12g内存的主机自己折腾用. win7 评分 cpu 内存7.5 显示7.9 硬盘5.8 ----------出问题了 ...
配置新系统（Win7 x64）
新装了一个Win7 x64系统.总结了一些系统配置需要注意的地方. 1. C盘空间发现C盘被用去了50G的空间,在什么软件都没装的情况下,被用去这么多,感到不可思议. 打开控制面板->文件夹选 ...
【Android 逆向】Android 逆向通用工具开发 ( Windows 平台运行的控制台应用程序类型 | 编译 Windows 平台运行的 Android 逆向程序 )
文章目录一.Windows 平台运行的控制台应用程序类型二.编译 Windows 平台运行的 Android 逆向程序一.Windows 平台运行的控制台应用程序类型 hacktool 工程的类 ...
Win7 x64下内核池溢出覆盖配额进程指针（Quota Process Pointer Overwrite）
0x0 简介在 Win7 x64位下,内核池的头部结构如下: nt!_POOL_HEADER+0x000 PreviousSize : Pos 0, 8 Bits // 前一个内核堆块大小除以0x1 ...
星岚技术 Win7 x64 装机版 V2021.4【带驱动包】
一.系统说明: 1.基于原版微软Win7 x64旗舰版,精心优化制作 2.采用适当的精简与优化,全面提升运行速度,充分保留原版性能和兼容性 3.系统集成"驱动总裁"驱动包,部署中调 ...
mupdf不支持x64_x86平台转x64平台关于内联汇编不再支持的解决
工具:VS2005 编译器:cl.exe(X86 C/C++) ml64.exe(X64 ASM64) 前提:X86下内联汇编是嵌在函数当中实现的在X86平台下,可以轻松的在C/C++代码中嵌入 ...
emacs python ide_Emacs Python IDE win7 x64
安装平台 win7 x64 ,emacs 23.3.1 snippet工具,可自定义一些模板: .emacs 配置如下 (add-to-list 'load-path "~/.emacs.d ...
MS Script Control的 COM
javascript 中有个eval方法,用过的人都知道他的方便和强大之处. 在C#中,我们也可以通过Com组件来执行一段javascript代码. 下面的代码展示了如何用MSScriptContro ...

Script Control 组件Win7 X64平台运行问题及示例

Script Control 组件Win7 X64平台运行问题及示例相关推荐

最新文章

热门文章