//****************************************************************************** // ショートカット作成&アイコン設定 //****************************************************************************** WScript.Echo("デスクトップにInvestigationのショートカットを作成します。"); try{ Shell = new ActiveXObject("WScript.Shell"); DesktopPath = Shell.SpecialFolders("Desktop"); //デスクトップにショートカット作成 link = Shell.CreateShortcut(DesktopPath + "//Inves.lnk"); link.Arguments = ""; // jarファイルに引数を渡す場合ここに記述 link.Description = "Investigation Tool"; link.HotKey = ""; link.IconLocation = Shell.CurrentDirectory + "//tool.bmp"; link.TargetPath = Shell.CurrentDirectory + "//execute.bat"; link.WindowStyle = 1; // 1:通常,2:最小化,3:最大化 link.WorkingDirectory = Shell.CurrentDirectory; link.Save(); } catch(e){ WScript.Echo( e.description + "(Error No =" + (e.number & 0xffff) + ")"); WScript.Quit(); } WScript.Echo( "デスクトップにショートカットを作成しました。/n"+ "Investigation Toolを起動する際はショートカットをダブルクリックしてください。");