Что нового

[Автоматизация] CheckBox - вкл. или выкл

siv14

Новичок
Сообщения
11
Репутация
1
Добрый день!
Помогите разобраться с проблемой.

надо поставить галочку "Показывать процесс соединения", а затем снять ее.

рисунок во вложении.
 

Yashied

Модератор
Команда форума
Глобальный модератор
Сообщения
5 379
Репутация
2 711
Код:
ControlCommand(..., ..., ..., "Check", "")


Код:
ControlCommand(..., ..., ..., "UnCheck", "")


Недостающие параметры узнаешь с помощью AutoIt Window Info.
 
Автор
S

siv14

Новичок
Сообщения
11
Репутация
1
У меня открывается первая вкладка, и должена устанавливаться галочка, но ни чего не выходит:

Код:
; Переход на закладку 0
$sTitle = "Параметры ящика"
WinWait($sTitle)
If Not WinActive($sTitle) Then WinActivate($sTitle)
WinWaitActive($sTitle)
$h_tabcontrol = ControlGetHandle($sTitle, "", "[CLASS:SysTabControl32; INSTANCE:1]")
$i_TabItems = _GUICtrlTab_GetItemCount($h_tabcontrol)
	_GUICtrlTab_ClickTab($h_tabcontrol, 0)
Sleep(1000)

ControlCommand("Параметры ящика", "Выдавать сообщения о приходящей почте", "", "Check", "")

Sleep(5000)
 

CreatoR

Must AutoIt!
Команда форума
Администратор
Сообщения
8 470
Репутация
2 401
siv14 [?]
рисунок во вложении
Так не прикрепляют рисунки, почему нельзя было выложить сразу файл рисунка, зачем его помещать в документ doc?

И ещё, код заключайте в тег autoit.

[?]
ни чего не выходит
....
ControlCommand("Параметры ящика", "Выдавать сообщения о приходящей почте", "", "Check", "")
Yashied же написал, «Недостающие параметры узнаешь с помощью AutoIt Window Info», вот тут недостающий параметр это CtrlID (перед "Check"), без него команда не знает какую галочку нужно отмечать.
 
Автор
S

siv14

Новичок
Сообщения
11
Репутация
1
Спасибо!
Действительно не досмотрел!
Все получилось.
 

xmel-sera

Новичок
Сообщения
16
Репутация
0
Здравствуйте!
Пишу скрипт для автоустановки РАдмина. Хочу написать команду через ControlClick, не получается... Подскажите как установить галочку "Полный доступ" в данном окне:
 

xmel-sera

Новичок
Сообщения
16
Репутация
0
Хотел сделать нажатие через MouseClick, тоже не получилось так как точно не знаю как указать координаты текущего места в нужном окне, а не размера монитора.
Это Radmin 3.0 - http://depositfiles.com/files/iube7btim
 

xmel-sera

Новичок
Сообщения
16
Репутация
0
OK. Проблему решил самостоятельно путем тыканья кнопок ))

Send ("{TAB 5}")
Send ("{SPACE}")
Send ("{Enter}")

Но есть еще одна проблема. При запуске скрипта программа (РАдмин 3.0) запускается но ничего не происходит, приходится закрывать нажатием кнопки "Отмена" и запускать скрипт заново. При этом в трее висит значок AutiIt, с установленной галочкой Script Paused. Повторно запуская скрипт программа устанавливается нормально.\

ShellExecuteWait("rserv30ru.msi")
WinWaitActive ("Radmin Server 3.0 - InstallShield Wizard", "&Далее >")
Send ("{Enter}")
 

xmel-sera

Новичок
Сообщения
16
Репутация
0
xmel-sera сказал(а):
Но есть еще одна проблема. При запуске скрипта программа (РАдмин 3.0) запускается но ничего не происходит, приходится закрывать нажатием кнопки "Отмена" и запускать скрипт заново. При этом в трее висит значок AutiIt, с установленной галочкой Script Paused. Повторно запуская скрипт программа устанавливается нормально.\

ShellExecuteWait ("rserv30ru.msi")
WinWaitActive ("Radmin Server 3.0 - InstallShield Wizard", "&Далее >")
Send ("{Enter}")
Проблема решена:
Вместо:
ShellExecuteWait ("rserv30ru.msi")
Написал
ShellExecute ("rserv30ru.msi")
 

madmasles

Модератор
Глобальный модератор
Сообщения
7 790
Репутация
2 319
xmel-sera [?]
Проблему решил самостоятельно путем тыканья кнопок
Можно так попробовать:
Код:
#include <GuiListView.au3>

$hWin = WinWait('Система безопасности Radmin', '', 3)
If Not $hWin Then Exit
$hListView = ControlGetHandle($hWin, '', '[CLASS:SysListView32; INSTANCE:2]')
If Not $hListView Then Exit
$iCount = _GUICtrlListView_GetItemCount($hListView)
If Not $iCount Then Exit
;все:
If _GUICtrlListView_GetItemChecked($hListView, 0) Then
	_GUICtrlListView_SetItemChecked($hListView, 0, False)
Else
	_GUICtrlListView_SetItemChecked($hListView, 0)
EndIf
Sleep(1000)
;обратно
If _GUICtrlListView_GetItemChecked($hListView, 0) Then
	_GUICtrlListView_SetItemChecked($hListView, 0, False)
Else
	_GUICtrlListView_SetItemChecked($hListView, 0)
EndIf
Sleep(1000)
;по очереди со второй строки
For $i = 1 To $iCount - 1
	If _GUICtrlListView_GetItemChecked($hListView, $i) Then
		_GUICtrlListView_SetItemChecked($hListView, $i, False)
	Else
		_GUICtrlListView_SetItemChecked($hListView, $i)
	EndIf
	Sleep(1000)
Next
;обратно
For $i = 1 To $iCount - 1
	If _GUICtrlListView_GetItemChecked($hListView, $i) Then
		_GUICtrlListView_SetItemChecked($hListView, $i, False)
	Else
		_GUICtrlListView_SetItemChecked($hListView, $i)
	EndIf
	Sleep(1000)
Next
 
Верх