windows.au3

; get/set GUI combobox/listbox in command line
Global $argc = $CmdLine[0]

If $argc < 1 Then
   Usage()
EndIf

Switch $CmdLine[1] Then
Case "get"
   If $argc < 3 Then
	  Usage()
   EndIf
   ConsoleWrite(Get($CmdLine[2], $CmdLine[3]))
Case "set"
   If $argc < 4 Then
	  Usage()
   EndIf
   Set($CmdLine[2], $CmdLine[3], $CmdLine[4])
Case Else
   Usage()
EndSwitch

Func Usage()
   ConsoleWrite("Usage: windows [get|set] window control [value]")
   Exit(1)
EndFunc

Func Get($window, $control)
   Return ControlCommand($window, "", $control, "GetCurrentSelection")
EndFunc

Func Set($window, $control, $value)
   Local $ref = ControlCommand($window, "", $control, "FindString", $value)
   ControlCommand($window, "", $control, "SetCurrentSelection", $ref)
   ControlClick($window, "", $control)
   ControlSend($window, "", $control, "{ENTER}")
EndFunc