Send to
Re: Send to
Code: Select all
Menu, Tray, Icon, % icon := A_WinDir "\System32\imageres.dll", % iconNum := 104
If !FileExist(lnk := A_AppData "\Microsoft\Windows\SendTo\" StrReplace(A_ScriptName, ".ahk", ".lnk"))
FileCreateShortcut, %A_AhkPath%, %lnk%,, %A_ScriptFullPath%, Play a sound file, %icon%,, %iconNum%
SoundPlay, % A_Args.1, Wait
ExitApp