2007年3月アーカイブ

'===========================================================
' InstantRails Development Environment Launcher for Windows
'===========================================================

x = InputBox("アプリタイプを入力してください。")

' Config

InstantRails = "C:\InstantRails\InstantRails.exe"
app_root = "C:\InstantRails\rails_apps\" + x +"\"
ruby_bin = "C:\InstantRails\ruby\bin\"

Set shell = WScript.CreateObject("WScript.Shell")

' Launch InstantRails
shell.Run(InstantRails)

cmds = "cd " + app_root + "& set PATH=" + ruby_bin + ";%PATH%"

' Launch test server
shell.Run("%ComSpec% /k " + cmds + "& ruby script\server")

' Open a new command prompt
shell.Run("%ComSpec% /k " + cmds)

' Open a app directory
shell.Run("explorer /e," + app_root)

' Open a test page
WScript.Sleep 5000
shell.Run("iexplore http://127.0.0.1:3000")

f.onSave = function(){
	var Shell = new ActiveXObject("WScript.Shell");
	if(App.Buffer.FileName.match(/\.as$/)){
		Shell.AppActivate("Macromedia Flash MX Professional 2004 -");
		sleep(500);
		Shell.SendKeys("+{F12}");
		while (!Shell.AppActivate("Mozilla Firefox")){
			sleep(100);
		}
		Shell.SendKeys("{F5}");
	}
}

function log(temp){
	getURL('javascript:alert("' + temp + '")');
}

function log(temp){
	getURL('javascript:if(window.console)console.log("' + temp + '")');
}