Помогите с Controlsend, почему то не работает!

[lexaSF]

Что тут не так?почему ControlSend не пашет вообще?Я что-то опять неправильно написал :-\

$ExeFile = 'C:\Users\Lexa\Desktop\UDOBot_v.4.0.0\UDOBot_v.4.0.0\UDOBot.exe'
$d = 'C:\Users\Lexa\Desktop\UDOBot_v.4.0.0\UDOBot_v.4.0.0'
Run($ExeFile, $d, @SW_MINIMIZE)
WinWait("UDOBot v.4.0.0","Start")
$GHandl = WinGetHandle('UDOBot v.4.0.0','Start')
ControlSend('UDOBot v.4.0.0','Start',$GHandl,'{TAB 3}') ; Ничего не делается
ControlSend('UDOBot v.4.0.0','Start',$GHandl,'{ENTER}') ; Здесь тоже
MsgBox(0,'','vse ok' & $GHandl)
$Handl = WinGetHandle('UDOBot v.4.0.0','File')
MsgBox(0,'','vse ok' & $Handl)
ControlSend('UDOBot v.4.0.0','Settings',$Handl,'{ALT}')  ;
ControlSend('UDOBot v.4.0.0','Settings',$Handl,'{ENTER}') ;
ControlSend('UDOBot v.4.0.0','Settings',$Handl,'{DOWN 1}') ;
ControlSend('UDOBot v.4.0.0','Settings',$Handl,'{ENTER}') ;
ControlSend('UDOBot v.4.0.0','Settings',$Handl,'{DOWN 1}') ;
ControlSend('UDOBot v.4.0.0','Settings',$Handl,'{ENTER}') ; Ни один не посылается
MsgBox(0,'','vse ok' & $Handl)
WinWait("Load Settings","Select the Setting you wish to")
ControlClick("Load Settings","Select the Setting you wish to","WindowsForms10.COMBOBOX.app.0.33c0d9d1")
ControlClick("Load Settings","Select the Setting you wish to","WindowsForms10.BUTTON.app.0.33c0d9d2")

 

[CreatoR]

lexaSF [?]

Что тут не так?

Код не обрамлён тегом autoit.

 

[lexaSF]

lexaSF [?]

Что тут не так?

Код не обрамлён тегом autoit.

А скодом что?

 

[Heler]

lexaSF, под какой ОС работаете?

 

[lexaSF]

Вин7

 

[Heler]

Возможно проблема в том, что Вы 'UDOBot v.4.0.0' запускаете с повышенными правами, а скрипт с обычными. ;)

 

[lexaSF]

Возможно проблема в том, что Вы 'UDOBot v.4.0.0' запускаете с повышенными правами, а скрипт с обычными. ;)

всмысле типа удо через админку а скрипт нет?

 

[Yashied]

{LangWarn.SModer}

 

[Heler]

Копипаст с microsoft сайта:

При входе в систему Windows создает маркер, который используется для определения уровня прав доступа к учетной записи. Учетные записи обычного пользователя получают обычный маркер, учетные записи администратора получают два маркера: маркер доступа обычного пользователя и маркер доступа администратора. Обычный маркер используется для открытия «Explorer.exe» (оболочка Windows) из которого запускаются все последующие программы. Дочерние процессы наследуют маркер запускающего их процесса. Поэтому, по умолчанию все программы запускаются от лица обычного пользователя —даже при входе в систему с учетной записью администратора. Некоторые программы требуют повышения уровня доступа до прав администратора. Именно тогда отображается запрос контроля учетных записей. При предоставлении учетных данных администратора, Windows открывает программу с использованием маркера доступа администратора.

Так вот 'UDOBot v.4.0.0' возможно потребовала повышения уровня доступа до прав администратора, а Ваш скрипт нет. Попробуйте вверху добавить:

#RequireAdmin

 

[lexaSF]

Работает, но не всегда, иногда на 3 раз..Чтоо такое(


Добавлено:

Сообщение автоматически объединено: 26 Дек 2010

Кажется, разобрался.Он вместо указанных 3 нажатий {TAB 3} посылает 2.странно, вот кусок кода

$GHandl = WinGetHandle('UDOBot v.4.0.0','Start')
ControlSend('UDOBot v.4.0.0','Start',$GHandl,'{TAB 3}') ; посылает 2

ВРоде все верно указано, с 4 работает..

 

[lexaSF]

Все, терь я точно зашел в тупик))
Вот так работает

Sleep(3000)
$t = WinGetHandle('UDOBot v.4.0.1','Прочка:')
ControlSend('UDOBot v.4.0.1','Прочка:',$t,'{ALT}')
ControlSend('UDOBot v.4.0.1','Прочка:',$t,'{DOWN 2}')
ControlSend('UDOBot v.4.0.1','Прочка:',$t,'{ENTER}')
ControlSend('UDOBot v.4.0.1','Прочка:',$t,'{DOWN}')
ControlSend('UDOBot v.4.0.1','Прочка:',$t,'{ENTER}')
WinWait('Загрузка настроек',"Выберите загружаемые настройки:")
ControlClick("Загрузка настроек","Выберите загружаемые настройки:","WindowsForms10.COMBOBOX.app.0.33c0d9d1")
WinSetState('UDOBot v.4.0.1','Прочка:',@SW_MINIMIZE)

А вместе с другой частью скрипта уже нет.

Sleep(1000)
$ExeFile = 'C:\Users\Lexa\Desktop\UDOBot_v.4.0.1_RUS_bez_reklamy\UDOBot.exe'
$d = 'C:\Users\Lexa\Desktop\UDOBot_v.4.0.1_RUS_bez_reklamy'
Run($ExeFile, $d, @SW_MINIMIZE)
WinWait("UDOBot v.4.0.1","Текущая карта:")
$GHandl = WinGetHandle('UDOBot v.4.0.1','Session ID:')
ControlSend('UDOBot v.4.0.1','Текущая карта:',$GHandl,'{TAB 4}')
ControlSend('UDOBot v.4.0.1','Текущая карта:',$GHandl,'{ENTER}')
MsgBox(0,'','vse ok' & $GHandl)
WinWait('UDOBot v.4.0.1','Прочка:')
MsgBox(0,'','vse ok' & $GHandl)
Sleep(3100)
Local $Title = WinGetHandle('UDOBot v.4.0.1','Прочка:')
MsgBox(0,'',@error)
ControlSend('UDOBot v.4.0.1','Прочка:',$title,'{ALT}')
ControlSend('UDOBot v.4.0.1','Прочка:',$title,'{DOWN 2}')
Sleep(1100)
ControlSend('UDOBot v.4.0.1','Прочка:',$title,'{ENTER}')
Sleep(1100)
ControlSend('UDOBot v.4.0.1','Прочка:',$title,'{DOWN}')
Sleep(1100)
ControlSend('UDOBot v.4.0.1','Прочка:',$title,'{ENTER}')
Sleep(1100)
MsgBox(0,'','vse ok' & $GHandl)
WinWait('Load Settings',"Select the Setting you wish to")
ControlClick("Load Settings","Select the Setting you wish to","WindowsForms10.COMBOBOX.app.0.33c0d9d1")

 

[lexaSF]

Попробовал сделать 2 отдельных скрипта, 1 включает бота, другой загружает, тоже самое!...

 

[r35p3ct]

Может лучше так? без $title, вместо него нужно указывать контрол, а если просто посылается в окно, то этот параметр не нужен.

ControlSend('UDOBot v.4.0.1','Прочка:','','{DOWN}')

 

[kaster]

OffTopic:
lexaSF
игнорирование требования модератора ни к чему хорошему (в контексте данного форума, конечно же) не приведет.

 

[CreatoR]

lexaSF
У ControlSend в третьем параметре должен быть CtrlID, а не указатель (Handle) окна.
Читай справку.