AutoHotkey Community

OnMessage(0x219, "notify_change")
DriveGet, dlist, list, REMOVABLE
Return

notify_change(wParam, lParam, msg, hwnd)
{ ; give the OS two seconds to do whatever (shuffle drivers or whatnot)
   SetTimer, CheckUSBDrives, -2000
}

CheckUSBDrives:
DriveGet, nlist, list, REMOVABLE
Loop Parse, nlist
   IfNotInString, dlist, %a_LoopField%
   {
      run %a_LoopField%:\
      dlist := nlist
   }
return

OnMessage(0x219, "notify_change")
DriveGet, dlist, list, REMOVABLE
Return

notify_change(wParam, lParam, msg, hwnd)
{ ; give the OS two seconds to do whatever (shuffle drivers or whatnot)
   SetTimer, CheckUSBDrives, -2000
}

CheckUSBDrives:
DriveGet, nlist, list, REMOVABLE
Loop Parse, nlist
   IfNotInString, dlist, %a_LoopField%
   {
      DriveGet, Ready, Ready, %a_LoopField%:\
      If Ready = Ready
      {
          run %a_LoopField%:\
          dlist := nlist
      }
   }
return

DriveGet, Ready, Status, %a_LoopField%:\

#SingleInstance force
;[======================================================]
;[  Check for these extensions for existence of images  ]
;[======================================================]
ext = jpg,nef,crw,cr2,raf,tif,kdc,dcr,mrw,orf,dng,ptx,pef,arw,srf,x3f,erf,mef,mos,raw,r3d

OnMessage(0x219, "notify_change")
DriveGet, dlist, list, REMOVABLE
Return

notify_change(wParam, lParam, msg, hwnd)
{ ; give the OS two seconds to do whatever (shuffle drivers or whatnot)
   SetTimer, CheckUSBDrives, -2000
}

CheckUSBDrives:
DriveGet, nlist, list, REMOVABLE
;[===============================================]
;[  If Drives are removed instead of plugged in  ]
;[                Then reset dlist               ]
;[===============================================]
If StrLen(nlist) < StrLen(dlist)
{
   dlist=%nlist%
   exit
}

Loop Parse, nlist
   IfNotInString, dlist, %a_LoopField%
   {
      DriveGet, drivestatus, Status, %a_LoopField%:\
      If drivestatus = Ready
      {
          vdrive = %a_LoopField%
          target = %vdrive%:\
          found =
          Loop,Parse,ext,`,
          {
           Loop, %vdrive%:\DCIM\*.%a_LoopField%, 0, 1
           {
            FileDir := A_LoopFileDir
            target = %FileDir%
            found = true
            break
           }
           if found
              break
        }
          run %target%
          break
      }
   }
;[======================================================]
;[  Close the "What do you want windows to do?" window  ]
;[======================================================]   
   IfWinExist, ahk_class #32770
      WinClose, ahk_class #32770   
return

 OnMessage(0x219, "privatedisk")


 privatedisk(wParam, lParam, msg, hwnd)
 {
 If wParam = 32768
 If lParam = 8977344
 If msg = 0x219
 If hwnd = 0x1208e4
 Run "C:\Program Files\Mozilla Firefox\firefox.exe" -no-remote -p gcal
 return
 }

OnMessage(0x219, "notify_change")