Закачка файла браузером из GUI.

[Fergus]

$GUI = GUICreate('Закачка', 225, 60)
$Input = GUICtrlCreateInput("", 10, 30, 160, 20)
GUISetBkColor(0xBBE38D)
GUISetState()
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

Как сделать так, чтобы при вводе ссылки начиналась закачка файла с помощью браузера Chrome.

 

[Fergus]

Подумал, что проще было бы через GUICtrlCreateButton "ОК", но как после нажатия "ОК" запустить браузер Chrome на ссылке которую ввели в GUICtrlCreateInput.

GUI = GUICreate('Закачка', 225, 160); Создаёт окно в центре экрана
$Input = GUICtrlCreateInput("", 10, 30, 160, 20)
GUICtrlCreateButton("ОК", 15, 125, 60, 20)
GUICtrlCreateButton("Закрыть", 150, 125, 60, 20)
GUISetBkColor(0xBBE38D); устанавливает цвет фона
GUISetState(); показывает созданное окно
While 1
    $nMsg = GUIGetMsg()
    Switch $nMsg
        Case $GUI_EVENT_CLOSE
            Exit
    EndSwitch
WEnd

 

[running-frag]

Opt ('MustDeclareVars',		1)	

#include <GUIConstantsEx.au3>			; $GUI_EVENT_CLOSE

Local $GUI =	GUICreate			('Закачка', 225, 160)
Local $_url = 	GUICtrlCreateInput	("", 		10,  30,  160, 20)
Local $_load =	GUICtrlCreateButton	("load", 	15,  125, 60,  20)
Local $_exit = 	GUICtrlCreateButton	("exit", 	150, 125, 60,  20)
				GUISetState 		(@SW_SHOW)
Local $_action

While True
    $_action = GUIGetMsg()
	
    Select
        Case $_action = $_exit Or $_action = $GUI_EVENT_CLOSE
            ExitLoop
			
		Case $_action = $_load
			InetGet (GUICtrlRead ($_url), @DesktopDir &"\downloaded_file.txt", 1)
			
		EndSelect		
WEnd