<html>
<head>
<
<
<
<title>工具栏</title>
<style>
<!--
body, table, p, td, div,select { font:menu}
.button {boder:0; HEIGHT: 20px;width:60px;cursor:hand;font:menu}
-->
</style>
</head>
<body>
<
function Run(strPath) {
exe.value=strPath;
try {
var objShell = new ActiveXObject("w
objShell.Run(strPath);
objShell = null;
}
catch (e){alert('找不到文件"'+strPath+'"(或它的组件之一)。请确定路径和文件名是否正确,而且所需的库文件均可用
。')
}
}
</
<p>请保存为HTA文件,再运行<br>
请输入要运行的程序:<br><input name=exe type=text size=20 value="regedit"><BUTTON class=button onclick="Run(exe.value)">确定
</BUTTON><BUTTON class=button onclick=exe.value="";>重新输入</BUTTON><br>
<BUTTON class=button onclick="Run('notepad')">记事本</BUTTON><br>
<BUTTON class=button onclick="Run('mspaint')">画图板</BUTTON><br>
<BUTTON class=button onclick="Run('calc')">计算器</BUTTON><br>
<BUTTON class=button onclick="Run('cmd')">cmd</BUTTON><br>
<BUTTON class=button onclick="Run('Regedit')">Regedit</BUTTON><br>
<BUTTON class=button onclick="Run('Msconfig')">Msconfig</BUTTON><br>
<BUTTON class=button onclick="Run('file:///D:/Program%20Files/Winamp/WINAMP.EXE')">WINAMP</BUTTON><br>
<BUTTON class=button onclick="Run('IEXPLORE.EXE')">IE</BUTTON><br>
<BUTTON class=button onclick="Run('..')">..</BUTTON><br>
<BUTTON class=button onclick="Run('%windir%')">%windir%</BUTTON><br>
<BUTTON class=button onclick="Run('%temp%')">%temp%</BUTTON><br>
</p>
</body>