Лёгкое приложение для монтирования логических разделов HDD.

как то давно делал для себя, посмотри
Код:
#include <GUIConstants.au3>

GUICreate("MoDev",400,130)  ; will create a dialog box that when displayed is centered

GUISetState (@SW_SHOW)       ; will display an empty dialog box



$regEnumVal = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE\RZ\MoDev", 1) ;читаем первое значение из реестра

if @error <> 0 then $regEnumVal="#" 

GUICtrlCreateLabel ("Диск",  10, 17, 30)    

GUICtrlCreateLabel ("Выбор иконки",  20, 90, 40,30)    

GUICtrlCreateLabel ("Смонтировать",  90, 17, 75)

GUICtrlCreateLabel ("Отмонтировать",  87, 45, 80)

GUICtrlCreateLabel ("Поиск дисков",  90, 75, 75)

GUICtrlCreateGroup ("Бонус", 12, 33, 53, 90)

GUICtrlCreateLabel ( "MoDev паразитирует на стандартной виндозной утилите ""mountvol"" для монтирования/демонтирования разделов диска без перезагрузки ВНИМАНИЕ: при изменении размеров разделов повторите поиск дисков", 210,10, 180, 110)

$combo=GUICtrlCreateCombo ($regEnumVal, 45,10,35) ; создаем combo

ControlDisable("", "#", $combo) ;делаем серым combo

For $i = 1 to 100

$regEnumVal = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE\RZ\MoDev", $i) ;читаем в цикле реестр

if @error <> 0 Then ExitLoop

GUICtrlSetData($combo,$regEnumVal) ; добавляем в combo буквы fixed дисков

next

$deMount=GUICtrlCreateButton ("Демонтировать",  170, 40, 25,23,$BS_ICON) ;кнопка демонтировать

GUICtrlSetImage ($deMount,"shell32.dll",131,0)

$mount=GUICtrlCreateButton ("Монт",  170, 10, 25,23,$BS_ICON) ;кнопка монтировать

GUICtrlSetImage ($mount,"shell32.dll",112,0)

$search=GUICtrlCreateButton ("Поиск дисков",  170, 70, 25,23,$BS_ICON) ;кнопка поиска

GUICtrlSetImage ($search,"shell32.dll",22,0)

$ico=GUICtrlCreateButton ("Иконки",  20, 50, 37,35,$BS_ICON) ;кнопка выбора иконки

If GUICtrlRead($combo)="#" then ControlDisable("", "", $ico) ;если дисков нет кнопка $ico неактивна

$str = StringLeft(GUICtrlRead($combo), 1) ;берем только букву

$r=RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\DriveIcons\"&$str&"\DefaultIcon", "") ;читаем путь к иконке

GUICtrlSetImage ($ico,"shell32.dll",8) ;показ иконки на кнопке по умолчанию

GUICtrlSetImage ($ico,$r,0) ;показ иконки на кнопке



; Run the GUI until the dialog is closed

While 1

    $msg = GUIGetMsg()

   Select

          Case $msg=$deMount

                 $system = StringLeft(@WindowsDir, 2)

                        If GUICtrlRead($combo)=$system then

                           MsgBox(8192,"Warning", "Осторожно !!! Вы выбрали системный диск")

                        EndIf

                 $deMountMsg=msgbox(8212,"Demounted", "Демонтировать диск "&GUICtrlRead($combo)&"   Уверен?") 

                        If $deMountMsg=6 then ;если Да то

                           Run("mountvol.exe"&" "&GUICtrlRead($combo)&" /D") ;демонтируем выбранный раздел

                        EndIf

          Case $msg=$mount

            $MountMsg=msgbox(8260,"Mounted", "Смонтировать диск "&GUICtrlRead($combo))  

                        ;msgbox(8260,"Mounted", $MountMsg)  

                           If $MountMsg=6 then ;если Да то

                                  $point = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\RZ\MoDev", GUICtrlRead($combo)) ;читаем точку монтирования

                                  ;msgbox(8260,"Mounted", $point)

                                  $point=StringReplace( $point, "\??\Volume", "\\?\Volume") ;меняем строку для mountvol

                                  ;msgbox(8260,"Mounted", $point)

                                  Run("mountvol.exe"&" "&GUICtrlRead($combo)&" "&$point) ;монтируем выбранный раздел

                                EndIf  

          Case $msg=$combo ;при выборе диска

                        $str = StringLeft(GUICtrlRead($combo), 1) ;берем только букву

                        $r=RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\DriveIcons\"&$str&"\DefaultIcon", "") ;читаем путь к иконке

                        GUICtrlSetImage ($ico,"shell32.dll",8) ;показ иконки на кнопке по умолчанию

                        GUICtrlSetImage ($ico,$r,0) ;показ иконки на кнопке

                        $system = StringLeft(@WindowsDir, 2) 

                                If GUICtrlRead($combo)=$system then ;если диск системный

                                   MsgBox(8192,"Warning", "Осторожно !!! Вы выбрали системный диск") ;появляется предупреждение

                                EndIf

          Case $msg=$search

                 $fixedDrive = DriveGetDrive( "fixed" ) ;все fixed диски

                        If NOT @error Then

                           ;MsgBox(4096,"", "Found " & $fixedDrive[0] & " drives")

                                  For $i = 1 to $fixedDrive[0] ;ищем все фиксированные диски

                                         ;MsgBox(4096,"Drive " & $i, $fixedDrive[$i])

                                         $key = RegRead("HKEY_LOCAL_MACHINE\SYSTEM\MountedDevices", "\DosDevices\" & $fixedDrive[$i]) ;ищем все значения фиксированных дисков в реестре

                                         ;MsgBox(4096, "\DosDevices\" & $fixedDrive[$i], $key)

                                         For $ii = 1 to 100

                                                $a = RegEnumVal("HKEY_LOCAL_MACHINE\SYSTEM\MountedDevices", $ii) ;просмотр ветви MountedDevices

                                                   If @error <> 0 Then ExitLoop

                                                ;MsgBox(4096, "HKEY_LOCAL_MACHINE\SYSTEM\MountedDevices" & $ii, $a)

                                                $result = StringInStr($a, "\??\Volume") ;проверка на наличие строк "\??\Volume"

                                                ;MsgBox(0, "Search result:", $result)

                                                        If $result = 1 Then                                                 ;если строки "\??\Volume" есть

                                                                $v = RegRead("HKEY_LOCAL_MACHINE\SYSTEM\MountedDevices", $a)  ;то читаем значения этих ключей

                                                                ;MsgBox(4096, $a, $v)

                                                                        If $v = $key Then                                                 

                                                                                ;MsgBox(4096, $fixedDrive[$i], $a) ;найденные соответствия буквы диска и точки монтирования

                                                                                                        ; Write a single REG_SZ value

                                                                                                        RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\RZ\MoDev", $fixedDrive[$i], "REG_SZ", $a) ;запись результата в реестр

                                                                        EndIf

                                                        EndIf

                                         next

                                  Next

                        EndIf

                 GUICtrlDelete($combo) ;удаляем старое combo

                 $regEnumVal = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE\RZ\MoDev", 1) ;читаем первое значение из реестра

                 $combo=GUICtrlCreateCombo ($regEnumVal, 45,10,35) ; создаем combo

                        For $i = 1 to 100

                           $regEnumVal = RegEnumVal("HKEY_LOCAL_MACHINE\SOFTWARE\RZ\MoDev", $i) ;читаем в цикле реестр

                                  if @error <> 0 Then ExitLoop

                           GUICtrlSetData($combo,$regEnumVal) ; добавляем в combo буквы fixed дисков

                        next

                 ControlEnable("", "", $ico) ;кнопка $ico активна

                 $str = StringLeft(GUICtrlRead($combo), 1) ;берем только букву

                 $r=RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\DriveIcons\"&$str&"\DefaultIcon", "") ;читаем путь к иконке

                 GUICtrlSetImage ($ico,"shell32.dll",8) ;показ иконки на кнопке по умолчанию

                 GUICtrlSetImage ($ico,$r,0) ;показ иконки на кнопке

          Case $msg=$ico

                 $str = StringLeft(GUICtrlRead($combo), 1) ;берем только букву

                 $icoPatch = FileOpenDialog("Выбор иконки", "", "Icons (*.ico;*.dll;*.exe)", 1 ) ;окно выбора файла

                        If $icoPatch<>"" then ;если путь не пустой

                           RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\DriveIcons\"&$str&"\DefaultIcon", "", "REG_SZ", $icoPatch) ;запись в реестр пути к иконке

                           GUICtrlSetImage ($ico,"shell32.dll",8) ;показ иконки на кнопке по умолчанию

                           GUICtrlSetImage ($ico,$icoPatch,0) ;показ иконки на кнопке

                        EndIf

   EndSelect

   If $msg = $GUI_EVENT_CLOSE Then ExitLoop

Wend
версию не помню, на всякий случай прикрепляю exe