Недавние сообщения

Страницы: [1] 2 3 ... 10
1
А еще есть окно с данными, как раз все те что нужны http://shot.qip.ru/00UQ3N-3lRCWJwZM/
но ни _INetGetSource($Url) ни BinaryToString(InetRead($Url)) ни _IEDocReadHTML () не содержат значений этих данных. Я так понимаю потому-что они в скрипте js выводятся, такого мое предположение
2
Стол заказов / Re: Получить значения со страницы в переменную скрипта
« Последний ответ от Grizli Отправлен Сегодня в 20:04:58 »
А еще есть окно с данными, как раз все те что нужны http://shot.qip.ru/00UQ3N-3lRCWJwZM/
но ни _INetGetSource($Url) ни BinaryToString(InetRead($Url)) ни _IEDocReadHTML () не содержат значений этих данных. Я так понимаю потому-что они в скрипте js выводятся, таково мое предположение
3
Автоматизация IE и Web-интерфейса / Re: Как нажать "Подписаться" на youtube
« Последний ответ от Kaen Отправлен Сегодня в 20:02:30 »
Да, как можно это сделать для кнопки " мне понравилось" ?
Перебрал все классы от неё - не получается.  :stars:
ТАкже интересно как это реализовать не в ИЕ, а в браузере по умолчанию и с отключением звука  :-[

 :IL_AutoIt_1:
4
Общие вопросы по AutoIt / [Массивы] Подсветка найденных совпадений в массиве
« Последний ответ от paa13 Отправлен Сегодня в 19:20:02 »
Здравствуйте! Помогите разобраться пж-ста.

Есть массив ИП адресов, совпадения подкрашиваются одинаковым цветом, не могу добиться чтобы при отсутствии совпадения цвета не было,
все равно подсовывает цвет, ведь в массиве он находит и сам себя

Вот код:
Код: AutoIt [Выделить]
$Label1 = GUICtrlCreateLabel($text1, 36, 20, 140, 22, BitOR($WS_BORDER, $ES_CENTER, $SS_CENTERIMAGE))
$Label2 = GUICtrlCreateLabel($text2, 36, 46, 140, 22, BitOR($WS_BORDER, $ES_CENTER, $SS_CENTERIMAGE))
$Label3 = GUICtrlCreateLabel($text3, 36, 72, 140, 22, BitOR($WS_BORDER, $ES_CENTER, $SS_CENTERIMAGE))
$Label4 = GUICtrlCreateLabel($text4, 36, 98, 140, 22, BitOR($WS_BORDER, $ES_CENTER, $SS_CENTERIMAGE))
$Label5 = GUICtrlCreateLabel($text5, 36, 124, 140, 22, BitOR($WS_BORDER, $ES_CENTER, $SS_CENTERIMAGE))


Dim $ip[] = [$text1, $text2, $text3, $text4, $text5]
Dim $colour[] = ["0x9d9d9d","0xdca537","0x5e37dc","0x3f8431","0xd1428c"]

For $i = 0 To UBound($ip) - 1
For $i = 0 To UBound($colour) - 1

    If $text1 = $ip[$i] then
        GUICtrlSetBkColor($Label1, $colour[$i])
    Else
        GUICtrlSetBkColor($Label1, $GUI_BKCOLOR_TRANSPARENT)
    EndIf
    If $text2 = $ip[$i] then GUICtrlSetBkColor($Label2, $colour[$i])
    If $text3 = $ip[$i] then GUICtrlSetBkColor($Label3, $colour[$i])
    If $text4 = $ip[$i] then GUICtrlSetBkColor($Label4, $colour[$i])
    If $text5 = $ip[$i] then GUICtrlSetBkColor($Label5, $colour[$i])

Next
Next
 

5
Стол заказов / Re: Поиск на сайте и вписывание нужной информации
« Последний ответ от deny Отправлен Сегодня в 15:13:58 »
не кто не возьмется?
6
Общие вопросы по AutoIt / Re: Исчезновение контекстов в cmd
« Последний ответ от AekMob Отправлен Сегодня в 13:51:16 »
Как раз только хотел написать, что для систем х64, скрипт должен быть запущен или скомпилирован как х64
7
Общие вопросы по AutoIt / Re: Исчезновение контекстов в cmd
« Последний ответ от pvnn Отправлен Сегодня в 13:38:39 »
AekMob, а ваш код где?
Какая версия Autoit

У меня все прекрасно работает:
Код: AutoIt [Выделить]
;#RequireAdmin

AutoItSetOption('WinTitleMatchMode',-2)
Run(@COMSPEC & ' /c '&'"'&'cmd'&'"')
WinWaitActive('cmd')
Send('netsh /?'&@CR)
 



Попробуйте запустить с #RequireAdmin
Если у вас x64, то попробуйте скомпилировать под нее ваш код.
8
Версия AutoIt: Любая 3.

Описание:
Требуется автоматическое обновление файлов исполняемой программы с сервера по http и автоматический уход на новый цикл в случае отсутствующего подключения к серверу.
Порядок действия:
1 ) Интервал выполнения 5 минут
2 ) Подключение к серверной машине
3 ) Скачивание контрольного файла в формате .txt
4) Сравнение файлов:
4.1 ) В случае совпадения новый цикл
4.2 ) В случае несоответствия скачивание файлов с новой версией и замена образца контрольного файла на машине
5 ) Команда на завершение работы программы и проверка завершен ли процесс
6 ) Удаление старых файлов
7 ) Замещение на новые файлы из скачанных с репозитория
8 ) Запуск программы
9 ) Уход на новый цикл


Примечания: Пробовал склепать свой вариант,но там и не смог справится с правильным подходом по циклу =( Если кому не сложно помочь буду чертовски рад готовому коду
9
Дни рождения / С днём рождения urrya!
« Последний ответ от Представитель Сообщества Отправлен Сегодня в 01:00:51 »
От имени всего Русского сообщества AutoIt поздравляем Вас urrya с днём рождения!



Цитировать
Пусть все мечты исполнятся,
Пусть все желанья сбудутся,
Пусть радости запомнятся,
А горести забудутся.

Здоровье будет крепкое,
В делах всегда согласие,
Любовь навеки верная —
Без ссор и разногласия.

Зарплата только вовремя,
Стабильная, высокая.
Работа будет лёгкая
И не совсем далёкая.

Пусть жизнь Вам дарит самые
Прекрасные мгновения.
Желаем только радости
И счастья, с днем рождения!
10
Спасибо огромное, ra4o
Все получилось
Единственно, я бы не торопился очищать поле ввода сразу, вдруг "передумается" открывать файл для загрузки... Получиться новых настроек еще нет, а старых уже нет  :)
Т.е. после строчки
Код: AutoIt [Выделить]
 $filename = FileOpenDialog('выбрать файл настроек', @ScriptDir& "\", "Файлы ini(*.ini)", 1 + 2)
 

добавить
Код: AutoIt [Выделить]
if @error  Then
MsgBox (262208,"","Настройки - не изменились!")
Else
GUICtrlSetData($Input1,IniRead($filename, "etap1", "Input1",""));
EndIf

 

Страницы: [1] 2 3 ... 10