一.首先在第一幀中用一個變量js來存放javascript函數 ：
var js = "function Run(objPath) {try {var objShell = new ActiveXObject(''wscript.shell'');objShell.Run(objPath);objShell = null;}catch (e){alert(''找不到指定文件''+objPath+''(或它的組件之一)，請確定文件或路徑是否正確，并確定更改了你的IE安全級別：Internet選項-->安全-->自定義級別-->對沒有標記為安全的ActiveX控件進行初始化和腳本運行-->啟用!'');}}";
二.之后在各個按扭里加上：
1.打開word:
on (release) {
getURL("javascript :Run(''WINWORD.EXE''); "+js);
}
2.打 開記事本：getURL("javascript :Run(''WINWORD.EXE''); "+js);
}
on (release) {
getURL("javascript :Run(''notepad'');"+js);
}
3.打開畫圖板：getURL("javascript :Run(''notepad'');"+js);
}
on (release) {
getURL("javascript :Run(''mspaint'');"+js);
}
4.打開計算器：getURL("javascript :Run(''mspaint'');"+js);
}
on (release) {
getURL("javascript :Run(''calc'');"+js);
}
5. 打開IE：getURL("javascript :Run(''calc'');"+js);
}
on (release) {
getURL("javascript :Run(''IEXPLORE.EXE'');"+js);
}
6.打開winamp(我的是裝在d盤的):getURL("javascript :Run(''IEXPLORE.EXE'');"+js);
}
on (release) {
getURL("javascript :Run(''file:///D:/Program%20Files/Winamp/WINAMP.EXE'');"+js);
}
7.打開cmd:getURL("javascript :Run(''file:///D:/Program%20Files/Winamp/WINAMP.EXE'');"+js);
}
on (release) {
getURL("javascript :Run(''cmd'');"+js);
}
8.打開注冊表：getURL("javascript :Run(''cmd'');"+js);
}
on (release) {
getURL("javascript :Run(''Regedit'');"+js);
}
9.打開''Msconfig''：getURL("javascript :Run(''Regedit'');"+js);
}
on (release) {
getURL("javascript :Run(''Msconfig'');"+js);
}
10.進入用戶文件夾:
on (release) {
getURL("javascript :Run(''..'');"+js);
}
11.進入winnt目錄：getURL("javascript :Run(''Msconfig'');"+js);
}
10.進入用戶文件夾:
on (release) {
getURL("javascript :Run(''..'');"+js);
}
on (release) {
getURL("javascript :Run(''%windir%'');"+js);
}
12.進入臨時文件夾：getURL("javascript :Run(''%windir%'');"+js);
}
on (release) {
getURL("javascript :Run(''%temp%'');"+js);
}
測試：getURL("javascript :Run(''%temp%'');"+js);
}
http://home.graffiti.net/db868/js.swf
