| WScript中js实现alert,confirm,prompt,msgbox，win64实现 |
方法一：js中调用WScript.Shell和vbs，因为WScript.Shell在win64位系统中不再支持，
wX0LYm http://www.numino.net
所以最后两个函数在32位系统可以直接运行，64位系统必须调用32位cscript才能运行，具体方法：
ODqj0S http://www.numino.net
开始菜单 -> 运行 -> 输入 "%windir%\SysWoW64\cmd.exe"
pGs6EX http://www.numino.net
->输入 "cscript /path/to/the/test.js"
A5Ukc3 http://www.numino.net
代码如下，保存为 test.js 即可。
02jU7b http://www.numino.net
function alert(msg) {
6rssLG http://www.numino.net
var wss = new ActiveXObject("WScript.Shell");
R7FZGK http://www.numino.net
wss.Popup(msg, 0, "提示", 64);
7n6NbY http://www.numino.net
}
RtdSpG http://www.numino.net
function confirm(msg) {
HFe1r5 http://www.numino.net
var wss = new ActiveXObject("WScript.Shell");
1QUut7 http://www.numino.net
return wss.Popup(msg, 0, "确认", 1|32) == 1;
4qRBG5 http://www.numino.net
}
pT4bze http://www.numino.net
function yesNoCancel(msg) {
jjZD0O http://www.numino.net
var shell = new ActiveXObject("WScript.Shell");
5XR04z http://www.numino.net
return shell.Popup(msg, 0, "确认", 3|32);
9vALOm http://www.numino.net
}
HNR2Q5 http://www.numino.net
function prompt(msg) {
kyG5IA http://www.numino.net
var scriptCtrl = new ActiveXObject("ScriptControl");
2507uq http://www.numino.net
msg = escape(msg + "");
j4ApD5 http://www.numino.net
scriptCtrl.Language = "VBScript";
npDgoW http://www.numino.net
var sTitle="输入";
E1WV9S http://www.numino.net
var vbsCode = 'InputBox(Unescape("' + msg + '"), "'+sTitle+'")';
S4k12X http://www.numino.net
//var vbsCode = 'InputBox(Unescape("' + msg + '"), "输入框")';
PkMjNP http://www.numino.net
//alert(vbsCode);
34Lp2Q http://www.numino.net
return scriptCtrl.Eval(vbsCode);
t8jLb9 http://www.numino.net
}
5ZO21s http://www.numino.net
function inputBox(msg,deflt) {
17VuuA http://www.numino.net
var scriptCtrl = new ActiveXObject("ScriptControl");
ls7EQJ http://www.numino.net
msg = escape(msg + "");
YL96k9 http://www.numino.net
scriptCtrl.Language = "VBScript";
VAeav1 http://www.numino.net
var sTitle="输入";
Vh2jq6 http://www.numino.net
var vbsCode = 'InputBox(Unescape("' + msg + '"),"'+sTitle+'","'+deflt+'")';
Q8u4bw http://www.numino.net
//var vbsCode = 'InputBox(Unescape("' + msg + '"), "输入框")';
0J2sWx http://www.numino.net
//alert(vbsCode);
YCz72x http://www.numino.net
return scriptCtrl.Eval(vbsCode);
YPPF7I http://www.numino.net
}
X84mQ2 http://www.numino.net
alert("hello world");
Ptj1aw http://www.numino.net
var x=confirm("ok?");
01266n http://www.numino.net
alert(x);
b6YB3y http://www.numino.net
var x=prompt("ok?");
sb4r0o http://www.numino.net
alert(x);
XscYDx http://www.numino.net
var x=inputBox("Pls","val");
5606Ec http://www.numino.net
alert(x);
a1c58f http://www.numino.net
方法二：混合使用js和VBS，保存为 Test.wsf
4ab8KQ http://www.numino.net
dxRF5R http://www.numino.net
<!-- Test.wsf -->
ph6i1D http://www.numino.net
<job id="InputBoxInJS">
XAwUBj http://www.numino.net
<script language="VBScript">
gLmywM http://www.numino.net
Function VBInputBox(promptText)
rnYo30 http://www.numino.net
VBInputBox = InputBox(promptText,"Input Box")
39Kfp0 http://www.numino.net
End Function
lVk62e http://www.numino.net
</script>
rv59YJ http://www.numino.net
<script language="JavaScript">
vZWSGN http://www.numino.net
function alert(msg) {
19yol9 http://www.numino.net
var wss = new ActiveXObject("WScript.Shell");
e5Dn27 http://www.numino.net
wss.Popup(msg, 0, "提示", 64);
8i88UT http://www.numino.net
}
qOCpcf http://www.numino.net
function confirm(msg) {
2Kp5hV http://www.numino.net
var wss = new ActiveXObject("WScript.Shell");
06ddbk http://www.numino.net
return wss.Popup(msg, 0, "确认", 1|32) == 1;
tO8W6U http://www.numino.net
}
9T6Kjn http://www.numino.net
function echo(x){
Wwj26u http://www.numino.net
var wss = new ActiveXObject("WScript.Shell");
bZuKN7 http://www.numino.net
wss.Echo(x);
eBU2J8 http://www.numino.net
}
53E9E1 http://www.numino.net
uP4BHT http://www.numino.net
var x = VBInputBox("Enter text")
1QkG2k http://www.numino.net
alert(x);
98aFo8 http://www.numino.net
echo(x);
LKkvLL http://www.numino.net
</script>
dk0PMq http://www.numino.net
</job>
|
|