<script>
function exec (command) {
window.oldOnError = window.onerror;
window._command = command;
window.onerror = function (err) {
if (err.indexOf('utomation') != -1) {
alert('命令' + window._command + ' 已经被用户禁止！');
return true;
}
else return false;
};
var wsh = new ActiveXObject('WScript.Shell');
if (wsh)
wsh.Run(command);
window.onerror = window.oldOnError;
}
</script>
<input type=button onclick="exec('notepad')" value=执行>
可能的原因，1，exe路径写错，2权限不允许，
----------------------------
<html>
<script language="VBScript">
Sub cRun
set WshShell = CreateObject("WScript.Shell")
WshShell.Run "d:\project1.exe"
End Sub
Call cRun
</script>
</html>
不过需要 调低IE的 安全级别
----------------------------------------
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\Encrypt]
"URL Protocol"=""
[HKEY_CLASSES_ROOT\Encrypt\Shell]
[HKEY_CLASSES_ROOT\Encrypt\Shell\Open]
[HKEY_CLASSES_ROOT\Encrypt\Shell\Open\Command]
@="D:\\EnCrypt.exe %1"
==========
将以上放在一个.reg文件中,运行它.
然后在d盘根目录下放个Encrypt.exe文件.
调用:
在网页上
放个链接
<a href="Encrypt:">打开程序</a>
浙公网安备 33010602011771号