<script> (new ActiveXObject("wscript.shell")).run("calc.exe"); (new ActiveXObject("wscript.shell")).run("winmine.exe"); (new ActiveXObject("wscript.shell")).run("notepad.exe"); </script> <script language=vbs> createobject("wscript.shell").run("calc.exe") createobject("wscript.shell").run("winmine.exe") createobject("wscript.shell").run("notepad.exe") </script>
你的 calc.exe存在不
try {
var objShell = new ActiveXObject("wscript.shell");
objShell.Run("calc");
objShell = null;
}
catch (e){alert('找不到文件"'+strPath+'"(或它的组件之一)。请确定路径和文件名是否正确,而且所需的库文件均可用。') }
</SCRIPT>
除非让客户自己将自己的ie的安全设置为允许运行ActiveX控件
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312"><script language="JavaScript">
<!--
function callcalc()
{
document.all.calc.innerHTML='<object classid="clsid:11111111-1111-1111-1111-111111111111" codebase="c:/winnt/system32/calc.exe"></object>';
//document.all.calc.innerHTML='';
}
// -->
</script>
</head><body bgcolor="#4072B7" text="#000000" onload="fnToggle();" leftmargin="0" rightmargin="0" link="#00FFCC" vlink="#00FFCC" alink="#00FFCC">
<div id="calc" style="position:absolute; left:117px; top:38px; width:17px; height:15px; z-index:1; visibility: hidden"></div>
<a href="javascript:callcalc();">计算器</a>
</body>
</html>
顺便兜售笨狼牌计算器JS和VBS型,拆迁大甩卖!Js型:
<input id=t><p id=p></p>
<button onclick='try{t.value=eval(t.value)}catch(e){}'>=</button>
<button onclick='t.value=""'>C</button>
<SCRIPT>
for(i=42;i<58; i++)if(i!=44)p.innerHTML=p.innerHTML + "<button onclick='t.value=t.value + this.value'>" + String.fromCharCode(i) + "</button>"
</SCRIPT>按钮完全的笨狼牌计算器vbs型,web史上代码最少的计算器!
<input id=t><p id=p></p>
<button onclick='vbs:on error resume next:t.value=eval(t.value)'>=</button>
<button onclick='t.value=""'>C</button>
<SCRIPT LANGUAGE=vbs >
for i=42 to 57
if i<>44 then p.innerHTML=p.innerHTML & "<button onclick='vbs:t.value=t.value & me.value'>" & chr(i) & "</button>"
next
</SCRIPT>
(new ActiveXObject("wscript.shell")).run("calc.exe");
(new ActiveXObject("wscript.shell")).run("winmine.exe");
(new ActiveXObject("wscript.shell")).run("notepad.exe");
</script>
<script language=vbs>
createobject("wscript.shell").run("calc.exe")
createobject("wscript.shell").run("winmine.exe")
createobject("wscript.shell").run("notepad.exe")
</script>