DirCreate("C:\new")
FileCopy("D:\Проги\AutoIT\Проверка флешек\*.*", "C:\new\")
#include <GUIConstants.au3>
GUICreate("Проверка флешек", 600, 400)
$filemenu = GUICtrlCreateMenu ("&Файл")
$fileitem = GUICtrlCreateMenuitem ("Открыть",$filemenu)
GUICtrlSetState(-1,$GUI_DEFBUTTON)
$helpmenu = GUICtrlCreateMenu ("Справка")
$saveitem = GUICtrlCreateMenuitem ("Сохранить",$filemenu)
GUICtrlSetState(-1,$GUI_DISABLE)
$infoitem = GUICtrlCreateMenuitem ("Помощь",$helpmenu)
$infoitem = GUICtrlCreateMenuitem ("О программе",$helpmenu)
$exititem = GUICtrlCreateMenuitem ("Выход",$filemenu)
$recentfilesmenu = GUICtrlCreateMenu ("Recent Files",$filemenu,1)
GUICtrlCreateLabel("Тест", 20, 10)
$hCombo =GUICtrlCreateCombo ("C:", 20,30,60) ; create first item
GUICtrlSetData($hCombo,"D:|E:|F:|G:|H:|I:|J:|K:|L:|M:|N:|O:|P:|Q:|R:|S:|T:|V:|W:|X:|Y:|Z:")
$hInput = GUICtrlCreateInput("-a", 10, 350, 100, 20)
$1button = GUICtrlCreateButton("Чтение", 20,60,60)
GUICtrlCreateLabel("Сохранить образ на", 110,10)
GUICtrlCreateCombo ("C:", 110,30,60) ; create first item
GUICtrlSetData(-1,"D:|E:|F:|G:|H:|I:|J:|K:|L:|M:|N:|O:|P:|Q:|R:|S:|T:|V:|W:|X:|Y:|Z:")
$2button = GUICtrlCreateButton("Сохранить", 110,60,60)
GUICtrlCreateGroup ("Выберите", 190, 30, 280, 150)
$radio_1 = GUICtrlCreateRadio ("Тест Чтения", 210, 60, 245, 20)
$radio_2 = GUICtrlCreateRadio ("Сохранить образ флеш", 210, 80, 245, 20)
$radio_3 = GUICtrlCreateRadio ("Залить Образ на флеш", 210, 100, 245, 20)
$radio_4 = GUICtrlCreateRadio ("Тест чтения/записи (на ошибки)", 210, 120, 245, 20)
$radio_5 = GUICtrlCreateRadio ("Сохранить Образ флеш (игнорируя ошибки)", 210, 140, 245, 20)
GUICtrlCreateGroup ("",-99,-99,1,1) ;close group
GUISetState(@SW_SHOW)
While 1
Switch GUIGetMsg()
Case -3
Exit
Case $1button
ShellExecute("C:\new\flashnul.exe " & GUICtrlRead($hCombo) & " " & GUICtrlRead($hInput))
EndSwitch
WEnd