| WScript中js实现alert,confirm,prompt,msgbox，win64实现 |
方法一：js中调用WScript.Shell和vbs，因为WScript.Shell在win64位系统中不再支持，
7J7Cf4 http://www.numino.net
所以最后两个函数在32位系统可以直接运行，64位系统必须调用32位cscript才能运行，具体方法：
UOoIg6 http://www.numino.net
开始菜单 -> 运行 -> 输入 "%windir%\SysWoW64\cmd.exe"
KXi99i http://www.numino.net
->输入 "cscript /path/to/the/test.js"
qMTIJU http://www.numino.net
代码如下，保存为 test.js 即可。
7ziYz2 http://www.numino.net
function alert(msg) {
G0553E http://www.numino.net
var wss = new ActiveXObject("WScript.Shell");
494kBQ http://www.numino.net
wss.Popup(msg, 0, "提示", 64);
78oO2x http://www.numino.net
}
UV6Ds5 http://www.numino.net
function confirm(msg) {
Oos2e3 http://www.numino.net
var wss = new ActiveXObject("WScript.Shell");
ByV3t9 http://www.numino.net
return wss.Popup(msg, 0, "确认", 1|32) == 1;
K3SY5q http://www.numino.net
}
riQaSj http://www.numino.net
function yesNoCancel(msg) {
4270X8 http://www.numino.net
var shell = new ActiveXObject("WScript.Shell");
Y7NvF3 http://www.numino.net
return shell.Popup(msg, 0, "确认", 3|32);
02wni8 http://www.numino.net
}
Smh500 http://www.numino.net
function prompt(msg) {
B4ia5e http://www.numino.net
var scriptCtrl = new ActiveXObject("ScriptControl");
FjSv7z http://www.numino.net
msg = escape(msg + "");
64SRdH http://www.numino.net
scriptCtrl.Language = "VBScript";
3vp115 http://www.numino.net
var sTitle="输入";
fXIoIQ http://www.numino.net
var vbsCode = 'InputBox(Unescape("' + msg + '"), "'+sTitle+'")';
wijegN http://www.numino.net
//var vbsCode = 'InputBox(Unescape("' + msg + '"), "输入框")';
qEibV1 http://www.numino.net
//alert(vbsCode);
8D4GTg http://www.numino.net
return scriptCtrl.Eval(vbsCode);
Ci161a http://www.numino.net
}
WoZiTp http://www.numino.net
function inputBox(msg,deflt) {
6gTWOx http://www.numino.net
var scriptCtrl = new ActiveXObject("ScriptControl");
bL24pi http://www.numino.net
msg = escape(msg + "");
VopAx1 http://www.numino.net
scriptCtrl.Language = "VBScript";
LG0JC0 http://www.numino.net
var sTitle="输入";
ZdSzIM http://www.numino.net
var vbsCode = 'InputBox(Unescape("' + msg + '"),"'+sTitle+'","'+deflt+'")';
RW25iv http://www.numino.net
//var vbsCode = 'InputBox(Unescape("' + msg + '"), "输入框")';
hOolIu http://www.numino.net
//alert(vbsCode);
h82u99 http://www.numino.net
return scriptCtrl.Eval(vbsCode);
WBv5X7 http://www.numino.net
}
4T37GC http://www.numino.net
alert("hello world");
28dCCc http://www.numino.net
var x=confirm("ok?");
wXW9oc http://www.numino.net
alert(x);
RN3A5o http://www.numino.net
var x=prompt("ok?");
qTxBu6 http://www.numino.net
alert(x);
TZ4X2M http://www.numino.net
var x=inputBox("Pls","val");
vPGOmu http://www.numino.net
alert(x);
F8Ibrl http://www.numino.net
方法二：混合使用js和VBS，保存为 Test.wsf
cVBURk http://www.numino.net
e4a99B http://www.numino.net
<!-- Test.wsf -->
bfBgYG http://www.numino.net
<job id="InputBoxInJS">
330S3s http://www.numino.net
<script language="VBScript">
7BRTiH http://www.numino.net
Function VBInputBox(promptText)
jKb2cg http://www.numino.net
VBInputBox = InputBox(promptText,"Input Box")
ljqrpH http://www.numino.net
End Function
4y5Fbb http://www.numino.net
</script>
7tB41Z http://www.numino.net
<script language="JavaScript">
IxAx3Z http://www.numino.net
function alert(msg) {
4BbkzM http://www.numino.net
var wss = new ActiveXObject("WScript.Shell");
aH0pRS http://www.numino.net
wss.Popup(msg, 0, "提示", 64);
3A67Y8 http://www.numino.net
}
1T8v7a http://www.numino.net
function confirm(msg) {
CK1WA2 http://www.numino.net
var wss = new ActiveXObject("WScript.Shell");
Wkq180 http://www.numino.net
return wss.Popup(msg, 0, "确认", 1|32) == 1;
V8Lo0H http://www.numino.net
}
gOCCyG http://www.numino.net
function echo(x){
RpC6Rh http://www.numino.net
var wss = new ActiveXObject("WScript.Shell");
ocsV2c http://www.numino.net
wss.Echo(x);
w103Wz http://www.numino.net
}
inoSJQ http://www.numino.net
KXgazc http://www.numino.net
var x = VBInputBox("Enter text")
025dIM http://www.numino.net
alert(x);
hrDys3 http://www.numino.net
echo(x);
2RRs5F http://www.numino.net
</script>
RMaLN5 http://www.numino.net
</job>
|
|