rem Поиск подключенного диска и старт
for %%i in (C D E F G H I J K L M N O P Q R S T U V W) do @Call:Search %%i
start DrCureIt.exe -InstallPath="%1:\Temp.2k10\Dr_Cure_It" -BeginPrompt="  Распаковка  и запуск  сканера  будут  произведены  из\nвыбранного диска. Рекомендуется использовать только\nна ПК с минимальным объёмом памяти.\n\n  Если предполагается низкоуровневое восстановление\nинформации  с  этого  диска,  или  диск  повреждён, не\nиспользуйте этот вариант (выберите другой диск)." -GUIFlags="1+8+32+64+2048"
exit

:Search
set var=1
for /f "tokens=1" %%a in ('dir /d %1:\Windows\explorer.exe') do set var=%%a
if %var% EQU 0 start DrCureIt.exe -InstallPath="%1:\Temp.2k10\Dr_Cure_It" -BeginPrompt="  Распаковка  и запуск  сканера  будут  произведены  из\nвыбранного диска. Рекомендуется использовать только\nна ПК с минимальным объёмом памяти.\n\n  Если предполагается низкоуровневое восстановление\nинформации  с  этого  диска,  или  диск  повреждён, не\nиспользуйте этот вариант (или выберите другой диск)." -GUIFlags="1+8+32+64+2048"&exit