通过ActiveX执行文件
2008-05-05 15:35 Virus-BeautyCode 阅读(549) 评论(0) 编辑 收藏 举报
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" >
<head>
<title>无标题页</title>
<script type="text/vbscript">
function run_file()
Set objShell=CreateObject("WScript.Shell")
objShell.Run "C:\Inetpub\wwwroot\RegexTester.exe",1,FALSE
Set objShell = Nothing
end function
</script>
<SCRIPT language=JavaScript>
function Run(strPath) {
try {
var objShell = new ActiveXObject("WScript.Shell");
objShell.Run(strPath);
objShell = null;
}
catch (e){alert('找不到文件"'+strPath+'"(或它的组件之一)。请确定路径和文件名是否正确，而且所需的库文件均可用。')
}
}
</SCRIPT>
</head>
<body>
<input id="Button1" type="button" value="button" onclick="run_file()" /><br />
<input id="Button1" type="button" value="button" onclick='Run("C:\Inetpub\wwwroot\RegexTester.exe")' />
</body>
</html>
<html xmlns="http://www.w3.org/1999/xhtml" >
<head>
<title>无标题页</title>
<script type="text/vbscript">
function run_file()
Set objShell=CreateObject("WScript.Shell")
objShell.Run "C:\Inetpub\wwwroot\RegexTester.exe",1,FALSE
Set objShell = Nothing
end function
</script>
<SCRIPT language=JavaScript>
function Run(strPath) {
try {
var objShell = new ActiveXObject("WScript.Shell");
objShell.Run(strPath);
objShell = null;
}
catch (e){alert('找不到文件"'+strPath+'"(或它的组件之一)。请确定路径和文件名是否正确，而且所需的库文件均可用。')
}
}
</SCRIPT>
</head>
<body>
<input id="Button1" type="button" value="button" onclick="run_file()" /><br />
<input id="Button1" type="button" value="button" onclick='Run("C:\Inetpub\wwwroot\RegexTester.exe")' />
</body>
</html>
