Перейти из форума на сайт.

НовостиФайловые архивы
ПоискАктивные темыТоп лист
ПравилаКто в on-line?
Вход Забыли пароль? Первый раз на этом сайте? Регистрация
Компьютерный форум Ru.Board » Компьютеры » Программы » AutoIT (Часть 3)

Модерирует : gyra, Maz

gyra (23-01-2020 10:51): AutoIT (Часть 4)  Версия для печати • ПодписатьсяДобавить в закладки
Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200

   

Widok



Moderator-Следопыт
Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору

 
Описание:

Цитата:
AutoIt v3 - это язык для написания сценариев, напоминающий BASIC. Основным его назначением является автоматизация работ с Windows GUI (графическим интерфейсом пользователя MS Windows). Для выполнения этой сложной задачи предоставляется комбинация испытанных методов, включающих в себя эмуляцию нажатий комбинаций клавиш клавиатуры, перемещения указателя мыши, управление окнами и их визуальными элементами. Как показывает практика, эти "приводные ремни" весьма эффективны для получения работающих решений в ситуациях, когда другие стандартные средства (например, VBScript и SendKeys) оказываются бессильны.
Умеет он очень и очень многое! Бесплатный.

 
  • Справки
  • Инструменты
  • Ресурсы, посвящённые AutoIt
  • Полезные советы новичкам и не только
  • Готовые решения
  • Скрипт раскраски кода AutoIt для публикации в форумах
     


     
    За шапкой следит ViSiToR / AZJIO  

  • Всего записей: 24190 | Зарегистр. 07-04-2002 | Отправлено: 13:07 01-06-2010 | Исправлено: Maz, 12:29 10-01-2020
    Skif_off

    Gold Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Bios834

    Цитата:
    имел виду окно по ширине и высоте.  

    Своё окно как-то так можно попробовать сделать (с возможностью прервать загрузку закрытием окна крестиком или Alt+F4).

    Цитата:
    aria2c замечен скачек шкалы бара с 98% на 20% при завершении загрузки при скачивании с обыкновенных ссылок

    Не получилось воспроизвести и в коде ничего такого не вижу. С какой-то конкретной ссылкой?
     
    Тут "всё в одном" немного подправил (опечатка, уточнение, чуть подсократил)

    Всего записей: 6531 | Зарегистр. 28-01-2008 | Отправлено: 13:52 01-04-2018 | Исправлено: Skif_off, 16:23 01-04-2018
    Bios834

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Skif_off
    как выше писал проблема осталась со шкалой прогресса, показывает 92% шкала скакнула на начало. картинка https://yadi.sk/i/jBK--6ew3Txfgu  
    В предыдущем скрипте отключал часть кода проходило все хорошо.  

    Код:
                        If StringInStr($Text, 'ETA:') Then  
                             ;$Text = StringRegExpReplace(StringReplace($Text, '(', ' (', 1, 1), ' (SEED|CN|SD|DL|UL):[^ ]+', '')  
                             ;$Text = StringReplace($Text, ' ETA:', ' / ', 1, 1)  
                        ;Else  
                            $Text = StringRegExpReplace(StringReplace($Text, '(', ' (', 1, 1), ' (SEED|CN|SD|DL|UL):[^ ]+', '')  
                        EndIf  

    Всего записей: 13 | Зарегистр. 28-03-2018 | Отправлено: 14:43 01-04-2018 | Исправлено: Bios834, 14:45 01-04-2018
    Skif_off

    Gold Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Bios834
    Ага, нашёл, там когда загрузка почти закончилась, aria2c перестаёт в вывод писать оставшееся время, но в регулярном выражении для получения процентов стоит ".+"

    Код:
    $Percent = StringRegExpReplace($Text, '(?s)[^\(]+\((\d+)%\).+', '\1', 1)

    и ожидается, что после закрывающей скобки будет ещё 1 или более символ (оставшееся время), а их в этом случае нет. Видимо, проглядел или осталось после проб и ошибок, прошу прощения.  
    Нужно заменить на ".*", поправил все примеры.

    Всего записей: 6531 | Зарегистр. 28-01-2008 | Отправлено: 16:32 01-04-2018
    Bios834

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Skif_off
    Спасибо ОГРОМНОЕ. Прошел тест отлично, по твоему совету добавил  Sleep(10), чтоб меньше грузил проц.

    Всего записей: 13 | Зарегистр. 28-03-2018 | Отправлено: 18:13 01-04-2018
    AZJIO



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Bios834

    Цитата:
    Sleep(10)
    можно и больше  
    Sleep(100) обновляет 10 раз в секунду
    Sleep(300) обновляет 3 раза в секунду
    для больших файлов реже запрос. Если можно получить размер, то можно из размера с неким коэффициентом получить время для Sleep. Если час будет качать и в течении минуты увеличится на 1 процент, то смысл запрашивать 10 раз в секунду (600 раз в минуту). Пользователю достаточно при заметном движении полосы не слишком рывком, а при медленном просто посмотреть текущее состояние.
    Если размер получить не удаётся, можно получить время ожидания между двумя разными показаниями и из него задать время для Sleep, но к примеру не больше секунды.

    Всего записей: 4423 | Зарегистр. 03-05-2006 | Отправлено: 12:42 03-04-2018 | Исправлено: AZJIO, 12:44 03-04-2018
    Bios834

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    AZJIO
    это хороший совет, но у меня ума не хватит такое реализовать.
     
    Добавлено:
    если поможете буду очень признателен.

    Всего записей: 13 | Зарегистр. 28-03-2018 | Отправлено: 15:04 03-04-2018
    AZJIO



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Bios834
    Оно и так будет работать, это я пофилосовствовать на тему идеального кода (времени конечно нет). Прога SlimDrivers старая версия тоже при скачке драйвера проц нагружала на 100%, выглядит профессионально, а такой баг пропустили. Новую версию не смотрел, она против пользователя уже написана.

    Всего записей: 4423 | Зарегистр. 03-05-2006 | Отправлено: 06:53 04-04-2018
    KingShif

    Newbie
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Подробнее...

    Всего записей: 1 | Зарегистр. 14-04-2018 | Отправлено: 15:16 14-04-2018
    Skif_off

    Gold Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    KingShif
    Наверное, можно попробовать через временный файл, как-то так, например.
    Остаётся разобраться с username и password.
    И Sleep(): даже 1000 - это как-то дофига, ни к чему так часто долбиться, раза в минуту или несколько вполне достаточно, думаю.
     
    Добавлено:

    Цитата:
    Иначе код не будет выполнятся если выйти из системы.

    Тогда, наверное, не стоит лезть в %TEMP% пользователя, изменил на \Windows\Temp.

    Всего записей: 6531 | Зарегистр. 28-01-2008 | Отправлено: 17:01 14-04-2018 | Исправлено: Skif_off, 17:18 14-04-2018
    Parazit111



    Junior Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Чё-то уже второй день не работает AutoIt.ru.
    У кого-нибудь работает?
     
    Только сказал, и заработал.

    Всего записей: 36 | Зарегистр. 19-01-2017 | Отправлено: 09:59 27-04-2018 | Исправлено: Parazit111, 10:59 27-04-2018
    Sergey_Demchuk



    Silver Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    Писал кто то для ютуба скрипты?
    Хочу сделать скрипт для авторегистрилки аккаунтов на Youtube.
    А так же в последующем скрипт для подписки на канал аккаунта (берем из текстового файла логин пароль, открываем браузер, заходим на заданный ютуб канал, подписываемся, выходим).  
    Может видел похожий код.

    Всего записей: 3552 | Зарегистр. 16-12-2002 | Отправлено: 21:52 30-04-2018
    stass10



    Advanced Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    ...

    Всего записей: 1313 | Зарегистр. 20-01-2003 | Отправлено: 00:28 02-05-2018 | Исправлено: stass10, 12:34 02-05-2018
    exMIB



    Silver Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    Подскажите, пожалуйста, конструкцию, чтобы скрипт висел в трее и раз в несколько секунд параметр брал из отдельного файла parametr.ini менял текст в текстовом файле 1.txt из списка spisok.txt по порядку построчно через промежуток времени
    Список в другом текстом файле
     
    Т.е. мне нужен функционал одной из закладки программы Snaz - закладка TextChanger для вывода информации на видеотрансляцию через OBS

    Всего записей: 3302 | Зарегистр. 27-09-2001 | Отправлено: 00:59 24-05-2018
    RW4PIR



    Full Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    ни как не могу запустить exe из папки
     
    RunAs('admin', @ComputerName, 'password', 1, @ScriptDir & 'Soft\10\7Zip\7z920.exe')
     
    скрипт лежит рядом с папкой софт соответственно

    Всего записей: 563 | Зарегистр. 16-03-2009 | Отправлено: 15:24 01-06-2018
    NIKZZZZ



    Gold Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    RW4PIR
    RunAs('admin', @ComputerName, 'password', 1, @ScriptDir & '\Soft\10\7Zip\7z920.exe')  

    Всего записей: 5365 | Зарегистр. 08-02-2006 | Отправлено: 15:31 01-06-2018 | Исправлено: NIKZZZZ, 15:33 01-06-2018
    RW4PIR



    Full Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    NIKZZZZ
     
    , да пропустил, но все равно не работает так:
    RunAs('admin', @ComputerName, 'password', 1, @ScriptDir & '\Soft\10\7Zip\7z920.exe')  
     
    а вот так работает:  
    Run(@ScriptDir & '\Soft\10\7Zip\7z920.exe')
     
    нужно с правами админа запускать некоторые приложения

    Всего записей: 563 | Зарегистр. 16-03-2009 | Отправлено: 15:39 01-06-2018
    NIKZZZZ



    Gold Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    RW4PIR
    А так ?

    Код:
    RunAs('admin', @ComputerName, 'password', 0, @ScriptDir & '\Soft\10\7Zip\7z920.exe')


    Всего записей: 5365 | Зарегистр. 08-02-2006 | Отправлено: 16:08 01-06-2018
    RW4PIR



    Full Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    NIKZZZZ
    Нет((

    Всего записей: 563 | Зарегистр. 16-03-2009 | Отправлено: 16:11 01-06-2018
    NIKZZZZ



    Gold Member
    Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
    RW4PIR
    А пароль не пустой?
    С пустым может не работать, как например стандартная runas.exe .

    Всего записей: 5365 | Зарегистр. 08-02-2006 | Отправлено: 17:53 01-06-2018
    RW4PIR



    Full Member
    Редактировать | Профиль | Сообщение | ICQ | Цитировать | Сообщить модератору
    NIKZZZZ
    пароля нет у админа
     
    Добавлено:
    все уже отпало, по другому сделал., еще вопрос такой, кнопки срабатывают не с первого раза иногда, не встречали такого?

    Код:
    #NoTrayIcon
    #RequireAdmin
    #Region
    #AutoIt3Wrapper_Res_Language=1049
    #EndRegion
    #include <GUIConstants.au3>
    GUICreate ("Окно",800,600)
    GUISetState (@SW_SHOW)
    Beep (500,500)
    GUICtrlCreateLabel ("Офисные программы",50,20,450,25)
    $Button_1 = GUICtrlCreateButton("Установить",650, 50, 100,25)
    $Button_2 = GUICtrlCreateButton("Установить",650, 80, 100,25)
    GUICtrlCreateLabel ("Другие программы",50,80,450,25)
     
     
    While 1
     Switch GUIGetMsg()
            Case $GUI_EVENT_CLOSE
                ExitLoop
        Case $Button_1
            Run(@ScriptDir & '\Soft\10\7Zip\7z920.exe')
            Beep (500,500)
        Case $Button_2
            
            Beep (500,500)
        EndSwitch
        If GUIGetMsg() = $GUI_EVENT_CLOSE Then ExitLoop
    Wend
    Beep (500,500)

    Всего записей: 563 | Зарегистр. 16-03-2009 | Отправлено: 18:23 01-06-2018
       

    Страницы: 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200

    Компьютерный форум Ru.Board » Компьютеры » Программы » AutoIT (Часть 3)
    gyra (23-01-2020 10:51): AutoIT (Часть 4)


    Реклама на форуме Ru.Board.

    Powered by Ikonboard "v2.1.7b" © 2000 Ikonboard.com
    Modified by Ru.B0ard
    © Ru.B0ard 2000-2024

    BitCoin: 1NGG1chHtUvrtEqjeerQCKDMUi6S6CG4iC

    Рейтинг.ru