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>
|
|