Что нового

[Данные, строки] Поле ввода в переменную

Grx-Lin

Новичок
Сообщения
27
Репутация
0
Здраствуйте. У меня по идее совсем простой вопрос,но...Но ответ пока не нашел.
Вот код:
Код:
$answer = InputBox("Вопрос", "Где вы родились?", "", "", -1, -1, 0, 0)

ShellExecute ("cmd.exe","","C:\Users\Grx-lin\Downloads\")
				$WWcmd = WinWait("C:\Windows\System32\cmd.exe","",5)
					if Not $WWcmd Then
					MsgBox(4096,'Сообщение','Окно не найдено,завершаем работу скрипта')
					Exit
				EndIf
				ControlSend($WWcmd,"","",$answer)

Если использовать InputBox все отлично. Но мне нужно вводить информацию через GUI,в поле ввода. Куда копать?
 
Автор
G

Grx-Lin

Новичок
Сообщения
27
Репутация
0
Что то лыжи совсем не едут.
Код:
Local $Input2, $sText

$Input2 = GUICtrlCreateInput('', 120, 35, 360, 20, -1, $WS_EX_STATICEDGE)
$sText &= 'Input2 =' & GUICtrlRead($iBtnOK)

Код:
Case $iBtnOK
			ShellExecute ("cmd.exe","","C:\Users\Grx-lin\Downloads\")
				$WWcmd = WinWait("C:\Windows\System32\cmd.exe","",5)
					if Not $WWcmd Then
					MsgBox(4096,'Сообщение','Окно не найдено,завершаем работу скрипта')
					Exit
				EndIf
				ControlSend($WWcmd,"","",'{ENTER}')
				ControlSend($WWcmd,"","",'bla-bla')
				ControlSend($WWcmd,"","",'{ENTER}')
				ControlSend($WWcmd,"","",'bla')
				ControlSend($WWcmd,"","",'{ENTER}')
				ControlSend($WWcmd,"","",$Input2,$sText)
				ControlSend($WWcmd,"","",'{ENTER}')

Явно не мой день,что я не понимаю? Пробовал по разному.
 

InnI

AutoIT Гуру
Сообщения
4,922
Репутация
1,432
Grx-Lin
что я не понимаю?
Принципа работы с элементами не понимаете.
$Input2 - это идентификатор элемента (порядковый номер, выдаваемый при создании). С его помощью работают с элементом, например, читают текст
Код:
$sText = GUICtrlRead($Input2)
ControlSend($WWcmd, "", "", $sText)
; или так
ControlSend($WWcmd, "", "", GUICtrlRead($Input2))
 
Верх