Начал изучать книгу AutoIt v3: краткое руководство. Andy Flesner http://autoit-script.ru/autoit_rv_ua/files/Other/AutoIt_v3_Kratkoe_Rukovodstvo.pdf
Полностью перепечатал пример номер 5, со страниц 9-10
Но при запуске получил ошибку:
Помогите пожалуйста решить проблему и заставить скрипт работать
Полностью перепечатал пример номер 5, со страниц 9-10
Но при запуске получил ошибку:
Помогите пожалуйста решить проблему и заставить скрипт работать
Код:
; Подключаем вложенные GuiConstants (необходимы для использования функций GUI)
#include <GUIConstants.au3>
; Скрываем иконку в трее
#NoTrayIcon
; Настройка режима показа системных сообытий OnEvent();
Opt('GUIOnEventMode',1)
; Создание GUI
GUICreate("Ai Smart Homes - Saint Louis, Missouri", 400, 300)
GUISetIcon("icon.ico")
; Запуск функций GUIExit() при закрытии GUI
GUISetOnEvent($GUI_EVENT_CLOSE, 'GUIExit')
; Логотип / изображение
GUICtrlCreatePic("logo.jpg",120,5,156,160)
; Инструкции
GuiCtrlCreateLabel("Please Choose an Option Below:", 50, 180, 300, 15, $SS_CENTER)
GuiCtrlSetColor(-1, 0xFF0000) ; цвет инструкции (здесь красный)
; Кнопка1
GUICtrlCreateButton("Visit Our Web Site", 100, 210, 200, 30)
GUICtrlSetOnEvent(-1, "WebSite"); при нажатии запускается website()
; Кнопка2
GUICtrlCreateButton("Send an Email", 100, 210, 200, 30)
GUICtrSetOnEvent(-1, "email"); при нажатии запускается email()
Func website()
; скрыть GUI на время выполнения функции
GuiSetState(@SW_HIDE)
Run("C:\Program Files\Internet Expoler\iexplore.exe www.aismarthones.com")
Exit
EndFunc
Func email()
; скрыть GUI на время выполнения Функции
GUISetState(@SW_HIDE)
Run("mailto: [email protected]")
Exit
EndFunc
; показывать GUI после завершения функции
GUISetState(@SW_SHOW)
; Бездействие скрипта во время выполнения цикла - эта функция ДОЛЖНА БЫТЬ ПОДКЛЮЧЕНА
OnEvent
mode While 1
(Sleep 500)
WEnd
; Эта функция заставляет выйти из скрипта при закрытии GUI
Func GUIExit()
Exit
EndFunc