TargetDir = C:\Program Files\Folder

Loop, %TargetDir%\*.exe
{
   Process, Exist, %A_LoopFileName%
   if ErrorLevel
   {
      WinClose, ahk_pid ErrorLevel,,2
      Process, Exist, %A_LoopFileName%
      if ErrorLevel
         Process, Close, %A_LoopFileName%
   }
}

Loop, %TargetDir%\*.dll
{
      hModule := DllCall("GetModuleHandle", Str, "%A_LoopFileName%", "Ptr")
	  if hModule
         DllCall("FreeLibrary", "Ptr", hModule)
}
sleep 500
FileDelete, %TargetDir%\*.exe
FileDelete, %TargetDir%\*.dll

FileDelete, C:\Program Files\Folder\*.exe
FileDelete, C:\Program Files\Folder\*.dll

Удаляются только не запущенные. Как осуществить их удаление? Заранее спасибо.