My AutoHotkey-keyboard shortcut script

AutoHotkey.ahk

;
;My hotkeys (NTJ)
;

;Remap back/forward browser buttons to Windows keys
;*SC16A down::Send, {LWINDOWN}
;*SC169 down::Send, {APPSKEY down}
;*SC16A up::Send, {LWINUP}
;*SC169 up::Send, {APPSKEY up}

; Disable Windows+Space
#space::SendInput #{F10}

; Start programs using AltGr + some key
^!a::Run, "c:\ProgramData\Microsoft\Windows\Start Menu\Programs\Microsoft Office\Microsoft Outlook 2010.lnk"
^!c::RunOrActivateProgram("C:\Documents and Settings\ntj\Local Settings\Application Data\Google\Chrome\Application\chrome.exe")
^!d::RunOrActivateProgram("cmd.exe", UserProfile)
^!i::RunOrActivateProgram("c:\Program Files (x86)\Internet Explorer\iexplore.exe")
^!l::RunOrActivateProgram("C:\Windows\System32\calc.exe")
^!n::RunOrActivateProgram("C:\Documents and Settings\ntj\My Documents\Visual Studio 2005\Projects\DrNetradioNowPlaying\DrNetradioNowPlayingGUI\bin\Debug\DrNetradioNowPlayingGUI.exe")
^!o::RunOrActivateProgram("C:\Program Files (x86)\Opera\Opera.exe")
^!p::RunOrActivateProgram("C:\Program Files\Cisco Systems\VPN Client\ipsecdialer.exe")
^!q::Run, "c:\Documents and Settings\ntj\My Documents\Projects\Politiken\Design\SlutprodukterArbejdsversionerProject.lnk"
^!r::Run "c:\windows\System32\mstsc.exe", UserProfile
^!s::RunOrActivateProgram("C:\Program Files (x86)\SportTracks 2.1\SportTracks.exe")
^!t::Run, c:\Program Files\Microsoft Office\OFFICE11\WINWORD.EXE
^!u::RunOrActivateProgram("c:\Program Files (x86)\UltraEdit\uedit32.exe")
;;; v til UltraMon
^!v::RunOrActivateProgram("C:\Program Files (x86)\VMware\VMware Player\vmplayer.exe")
^!w::RunOrActivateProgram("C:\Program Files (x86)\TotalCMD\TOTALCMD.EXE", "", "Max")
^!x::RunOrActivateProgram("c:\Program Files (x86)\Microsoft Office\Office14\EXCEL.EXE")


; Function to run a program or activate an already running instance
RunOrActivateProgram(Program, WorkingDir="", WindowSize=""){
	SplitPath Program, ExeFile
	Process, Exist, %ExeFile%
	PID = %ErrorLevel%
	if (PID = 0) {
		Run, %Program%, %WorkingDir%, %WindowSize%
	}else{
		WinActivate, ahk_pid %PID%
	}
}