Нужна помощь по ComboBox

FlatX007 · Отправлено: **18:13, 07-09-2009** | #2

Правда ни когда этим не занимался ...

Код:

Run("notepad.exe")
WinWaitActive ("[CLASS:Notepad]", "")
Send("Hello from Notepad.{ENTER}1 2 3 4 5 6 7 8 9 10{ENTER}")
Send ("^s")
WinWaitActive ("Сохранить как", "")
ControlSend ("Сохранить как", "", "[CLASS:Edit; INSTANCE:1]", "ля ля ля .txt")
Sleep(100)
ControlClick ("Сохранить как", "", "[CLASS:ComboBox; INSTANCE:4]")
Send ("{DOWN}")
Send ("{DOWN}")
Send ("{DOWN}")
Send ("{DOWN}")
Send ("{ENTER}")
ControlClick ("Сохранить как", "", "[CLASS:Button; INSTANCE:2]")
WinClose("[CLASS:Notepad]", "")

sacredboy · Отправлено: **20:07, 07-09-2009** | #3

FlatX007, а Вы не подскажете как раскрыть КомбоБокс Save in, что вместо флэшки PQI файл сохранился на Десктоп или диск Д. В вашей версии скрипта этого нет.

Medic84 · Отправлено: **20:58, 07-09-2009** | #4

Грубо говоря - Зачем Вам все это??? ИМХО легче будет

Код:

$hOpen = FileOpen("C:\Program Files\AutoIT\sacredboy.txt",128)
FileWrite($hOpen,"Какой то текст")
FileClose($hOpen )

И ВСЕ!! Зачем делать автомвтизацию блокнота???

P.S. Если непонятно что за цифры 128 - посмотрите в справке

Если вам показалось что я "кричу" - не обращайте внимания, я чутка нервничаю

FlatX007 · Отправлено: **22:37, 07-09-2009** | #5

Цитата sacredboy:

В вашей версии скрипта этого нет. »

Вам бы всё сразу, и готовое... а сделать по образцу ?

Во вторых - кнопка полезное сообщение работает т.к. я всё таки потратил своё личное время на создание ответа на ваш вопрос... если вам не трудно.. (просто отпадает всякое желание отвечать

)

sacredboy · Отправлено: **07:45, 08-09-2009** | #6

FlatX007, такой вопрос: почитал это http://www.oszone.net/3663. Там есть такой пример:

Код:

;выбрать строку Full Install из выпадающего списка ComboBox1 в окне установки FLY 2000 TV, содержащем текст Выберите тип установки 
ControlCommand('FLY 2000 TV','Выберите тип установки','ComboBox1','SelectString','Full Install')

Можно ли по этому подобию сделать то что мне нужно?

Начинаю подозревать точнее AutoIT Windows Info показывает что нужная мне строка зовется не ComboBox а ToolbarWindow.

Пробовал так:

Код:

ControlClick ("Сохранить как", "", "ToolbarWindow324", "C:\Users\Alexander\Documents")

не работает.

FlatX007 · Отправлено: **15:49, 08-09-2009** | #7

Код:

Run("notepad.exe")
WinWaitActive ("[CLASS:Notepad]", "")
Send("Hello from Notepad.{ENTER}1 2 3 4 5 6 7 8 9 10{ENTER}")
Send ("^s")
WinWaitActive ("Сохранить как", "")
ControlSend ("Сохранить как", "", "[CLASS:Edit; INSTANCE:1]", Round(Random(1000, 1000000)) & ".txt")
Sleep(100)
ControlClick ("Сохранить как", "", "[CLASS:ComboBox; INSTANCE:4]")
Send ("{DOWN}")
Send ("{DOWN}")
Send ("{DOWN}")
Send ("{DOWN}")
Send ("{ENTER}")

$hPossave = WinGetPos("Сохранить как")
WinMove("Сохранить как", "", @DesktopWidth / 2 - $hPossave[2] / 2, @DesktopHeight / 2 - $hPossave[3] / 2)
$hPossave = WinGetPos("Сохранить как")
MouseMove($hPossave[0] + 40, $hPossave[1] + 159)
Sleep(100)
MouseDown("left")
Sleep(100)
MouseUp("left")

ControlClick ("Сохранить как", "", "[CLASS:Button; INSTANCE:2]")
WinClose("[CLASS:Notepad]", "")

Alex2103 · Отправлено: **22:04, 08-09-2009** | #8

Вот так можно попробывать:

PHP код:


#Include <GuiComboBox.au3>    

WinActivate("Сохранить как", "")  

ControlSend("Сохранить как", "", "Edit1", @DesktopDir&"\sacredboy")    



$hwnd=ControlGetHandle ( "Сохранить как", "", "ComboBox3" ) 

 _GUICtrlComboBox_SelectString($hwnd, "Текстовые документы (*.txt)")    



$hwnd=ControlGetHandle ( "Сохранить как", "", "ComboBox4" )  

_GUICtrlComboBox_SelectString($hwnd, "UTF-8")    



ControlClick( "Сохранить как", "", "Button2" )

sacredboy · Отправлено: **23:11, 08-09-2009** | #9

FlatX007, последняя версия скрипта у Вас сработала? У меня Ваш скрипт все равно останавливается на окне которое показано в первом сообщении.

Alex2103, выдает такую ошибку:

Alex2103 · Отправлено: **23:13, 08-09-2009** | #10

sacredboy, а про #Include <GuiComboBox.au3> не забыли?