Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [архив - Часть 2] AutoIt скрипты

Закрытая тема
Настройки темы
[архив - Часть 2] AutoIt скрипты

(*.*)


Сообщения: 36554
Благодарности: 6693


Конфигурация

Профиль | Сайт | Отправить PM | Цитировать


Изменения
Автор: Vadikan
Дата: 27-01-2008
Внимание!
Тема переведена в архивное состояние







(настоятельно рекомендуется к прочтению/поиску)


Руководство к действию по работе c AutoIt.


Сайт программы
Русская справка
Коллекция AutoIt скриптов от Sanja Alone
Коллекция AutoIt скриптов от MSFN (могут быть устаревшие).
Справочник по командам rundll32 (команды запуска диалоговых окон и не только...)

AutoIt скрипты - введение и FAQ (статья содержит вводную информацию по AutoIt, а также ответы на ЧаВо).



Данная тема предназначена для общих вопросов по AutoIt. Вопросы по установке приложений при помощи AutoIt следует задавать в соответствии с правилами форума "Автоматическая установка приложений". Таким образом, если вы хотите узнать как установить Winamp 5.x при помощи AutoIt, то создайте тему [autoit] Winamp 5.х (если таковой еще нет на форуме). Проверить наличие тем можно при помощи поиска или фильтров.
Цитата Vadikan:
В теме уже свыше 500 сообщений и поиск нужной информации в ней усложняется. Есть предложение собрать все решения (скрипты) и разместить их на Wiki по принципу "один скрипт - одна статья wiki", добавляя статьи в категорию Autoit. Речь, в принципе, идет об общих решениях, а не о скриптах для установки конкретной программы. Название статьи, очевидно, должно отражать назначение скрипта. Затем можно в шапке просто разместить ссылки на статьи Wiki.

-------
Канал Windows 11, etc | Чат @winsiders

Это сообщение посчитали полезным следующие участники:

Отправлено: 00:02, 05-02-2006

 

Аватара для Creat0R

Must AutoIt


Сообщения: 3054
Благодарности: 1009

Профиль | Сайт | Отправить PM | Цитировать


TERMINAL,
Цитата:
как сделать если он есть, то прога просто использует EXIT
Просто вытащий из цикла:

Код: Выделить весь код
#NoTrayIcon

$Minutes = 10 ;Тут задаётся интервал ожидания в минутах

Sleep(1000)
$Timer = TimerInit()
_IdleWaitCommit(0)

Func _IdleWaitCommit($idlesec)
    Local $iSave, $LastInputInfo = DllStructCreate ("uint;dword")
    DllStructSetData ($LastInputInfo, 1, DllStructGetSize ($LastInputInfo))
    DllCall ("user32.dll", "int", "GetLastInputInfo", "ptr", DllStructGetPtr ($LastInputInfo))
    Do
        $iSave = DllStructGetData ($LastInputInfo, 2)
        Sleep(100)
        DllCall ("user32.dll", "int", "GetLastInputInfo", "ptr", DllStructGetPtr ($LastInputInfo))
        If TimerDiff($Timer) >= $Minutes * 60000 Then
            MsgBox(64, "Внимание", "10 минут спустя, а хозяина нету ;)", 10)
            ;Shutdown(1 + 4) ;Force Shutdown
            ExitLoop
        EndIf
    Until (DllStructGetData ($LastInputInfo, 2)-$iSave) > $idlesec
    Return DllStructGetData ($LastInputInfo, 2)-$iSave
EndFunc
Всё, теперь при первом запуске, если ничего не нажимать (и не двигать мышку), скрипт будет ждать 10 минут и выключит комп, если в течении этого времени юзер что-то сделает , то скрипт завершит работу.

SAOPP,
Цитата:
чем лучше и практичнее будет выглядеть эта операция?
Во-первых тем что это быстрее, а во-вторых я подозреваю разработчики AutoIt вскоре совсем откажутся от Opt("WinTitleMatchMode", X)... и тогда придётся переделывать все наши скрипты которые использовали этот метод.

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community


Отправлено: 13:05, 24-09-2007 | #471



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Аватара для TERMINAL

Ветеран


Сообщения: 753
Благодарности: 28

Профиль | Отправить PM | Цитировать


Creat0R, Спасибо огромное (правда ещё не проверял, но верю). Пока ты мне помогал, то я написал одну прогу-может кому-то и пригодится... Суть вот в чём... Я Админ и у меня все работают в 1С, но есть удалённая точка которую нужно тоже контролировать (когда на работу пришёл, когда ушёл...), инет не всегда есть-поэтому можно отмазаться тому человеку. Каждый день я с ним обмениваюсь папкой для 1С ну и решил запустить такую прогу, которая будет сама стартовать и делать мне отчёт...
читать дальше »

Local $Den = @MDAY
Local $Mesyac = @MON
Local $God = @YEAR
Local $4as = @HOUR
Local $Minute = @MIN

Global $1C="1cv7.exe"
IniWrite ( @HomeDrive & "\Пакет\Time.ini", "Запуск компа ", "Включение " & $Den & "." & $Mesyac & "." & $God , " " & $4as & "." & $Minute)
FileSetAttrib ( @HomeDrive & "\Пакет\Time.ini","+H" )

For $i = 1 To 1000
If ProcessWait ($1C) Then
Local $Den1 = @MDAY
Local $Mesyac1 = @MON
Local $God1 = @YEAR
Local $4as1 = @HOUR
Local $Minute1 = @MIN
IniWrite ( @HomeDrive & "\Пакет\Time.ini", "1C", "Запуск программы 1С " & $i & " " & $Den1 & "." & $Mesyac1 & "." & $God1 , " " & $4as1 & "." & $Minute1)
ProcessWaitClose ($1C)
Local $Den2 = @MDAY
Local $Mesyac2 = @MON
Local $God2 = @YEAR
Local $4as2 = @HOUR
Local $Minute2 = @MIN
IniWrite ( @HomeDrive & "\Пакет\Time.ini", "1C", "Выход с программы 1С " & $i & " " & $Den2 & "." & $Mesyac2 & "." & $God2 , " " & $4as2 & "." & $Minute2)
EndIf
Next

-------
Автоматизация прежде всего....


Последний раз редактировалось TERMINAL, 24-09-2007 в 13:56. Причина: Нашёл ошибку-исправил


Отправлено: 13:50, 24-09-2007 | #472


Ветеран


Сообщения: 916
Благодарности: 34

Профиль | Отправить PM | Цитировать


Creat0R,
У меня встречный вопрос (и просьба если это осуществимо), можно ли сделать как предлагаете вы, только вот меня интересует следующее, можно ли заставить курсор "щёлкать" (входить в меню панели задач) на часах Windows а не на всей панели конкретно?

Если это осуществимо, решается вопрос о "загрязнённой" панели задач открытыми окнами - это когда места нету на панели задач свободного, а открыты приложения/окна занимающее всё пустое место, таким образом AutoIt щёлкает на любом окне и не выполняет поставленную задачу

-------
All my homies dont play better watch what you say and put your glock away, ease back, ease back, ease back before i squeeze that...


Отправлено: 19:09, 24-09-2007 | #473


Аватара для Creat0R

Must AutoIt


Сообщения: 3054
Благодарности: 1009

Профиль | Сайт | Отправить PM | Цитировать


SAOPP,
Цитата:
можно ли заставить курсор "щёлкать" (входить в меню панели задач) на часах Windows а не на всей панели конкретно?
Можно полагаю...

Код: Выделить весь код
ControlClick("[Class:Shell_TrayWnd]", "", "TrayClockWClass1", "Right")

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community


Отправлено: 21:47, 24-09-2007 | #474


Ветеран


Сообщения: 916
Благодарности: 34

Профиль | Отправить PM | Цитировать


Опаньки, к сожалению я не приложу ума к этому, а продолжения в виде опуститься один раз вниз или как вы писал ранее для того, что бы не бегать 10 раз вверх, плюс там выбрать 4ю позицию:

-------
All my homies dont play better watch what you say and put your glock away, ease back, ease back, ease back before i squeeze that...


Отправлено: 23:07, 24-09-2007 | #475


Аватара для Creat0R

Must AutoIt


Сообщения: 3054
Благодарности: 1009

Профиль | Сайт | Отправить PM | Цитировать


SAOPP,
Если я правильно понял, то вот:

Код: Выделить весь код
$TrayTitle = "[CLASS:Shell_TrayWnd]"
ControlClick($TrayTitle, "", "TrayClockWClass1", "Right")
Send("{DOWN}")
Send("{ENTER}")
Send("{DOWN 2}")
Send("{ENTER}")

-------
“Сделай так просто, как возможно, но не проще этого.”... “Ты никогда не решишь проблему, если будешь думать так же, как те, кто её создал.”

Альберт Эйнштейн

P.S «Не оказываю техподдержку через ПМ/ICQ, и по email - для этого есть форум. ©»

http://creator-lab.ucoz.ru/Images/Icons/autoit_icon.png Русское сообщество AutoIt | http://creator-lab.ucoz.ru/Images/Ic...eator_icon.png CreatoR's Lab | http://creator-lab.ucoz.ru/Images/Icons/oac_icon.png Opera AC Community

Это сообщение посчитали полезным следующие участники:

Отправлено: 23:36, 24-09-2007 | #476


Ветеран


Сообщения: 916
Благодарности: 34

Профиль | Отправить PM | Цитировать


Благодарю. Огромное спасибо - теперь "проблема" как таковая решена вообще

-------
All my homies dont play better watch what you say and put your glock away, ease back, ease back, ease back before i squeeze that...


Отправлено: 23:49, 24-09-2007 | #477


Новый участник


Сообщения: 25
Благодарности: 1

Профиль | Цитировать


Нет ли у кого примера скрипта как убрать иконку из tray в винде при загрузке и не показывать ее до следующей перезагрузки

Отправлено: 13:22, 25-09-2007 | #478


Аватара для Maza Faka

Ветеран


Сообщения: 604
Благодарности: 133

Профиль | Отправить PM | Цитировать


adima
Какую иконку, какого приложения?

-------
Сообщение помогло? Не забудьте нажать на Полезное сообщение


Отправлено: 14:00, 25-09-2007 | #479


Новый участник


Сообщения: 25
Благодарности: 1

Профиль | Цитировать


например radmin

Отправлено: 15:01, 25-09-2007 | #480



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [архив - Часть 2] AutoIt скрипты

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Открывая 7z архив пишет не удаётся открыть как архив. Можно ли его восстановить? DreDo Хочу все знать 4 01-12-2009 18:54
[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:. Vadikan AutoIt 1543 18-01-2009 10:46
[Архив - Часть 1.3] AutoIt скрипты biork AutoIt 503 09-06-2007 11:27
[Архив - Часть 1.2] AutoIt скрипты Dirk Diggler AutoIt 505 02-12-2006 11:00
[Архив - Часть 1.1] AutoIt скрипты EgOrus AutoIt 335 04-02-2006 16:58




 
Переход