|
Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [решено] Административная программка |
|
[решено] Административная программка
|
Новый участник Сообщения: 2 |
Ребят сделал несколько скриптов по автоматической установке, теперь бы хотел и все совместить в одну форму где можно было отмечать галочкой что ставить а что нет.
Подскажиет с чего начать. Можно было бы все вместе в один скрип впихнуть, но хочется чтобы был выбор, чего ставить. Привел примерную форму сделана с помощью Koda. #include <GUIConstants.au3> $Form1 = GUICreate("Form1", 554, 240, 193, 125) $Group1 = GUICtrlCreateGroup("Для офиса", 8, 8, 265, 196) $Checkbox1 = GUICtrlCreateCheckbox("Microsoft Office 2003", 24, 56, 169, 17) $Checkbox2 = GUICtrlCreateCheckbox("Mazillla FireFox", 24, 80, 97, 17) $Checkbox3 = GUICtrlCreateCheckbox("Foxit PDF Reader", 24, 104, 97, 17) $Checkbox4 = GUICtrlCreateCheckbox("ICQ", 24, 128, 97, 17) $Checkbox5 = GUICtrlCreateCheckbox("Total Commander", 24, 152, 121, 17) $Checkbox7 = GUICtrlCreateCheckbox("The Bat!", 24, 176, 97, 17) $Checkbox9 = GUICtrlCreateCheckbox("1С Предприятие v8.1", 24, 32, 169, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Group2 = GUICtrlCreateGroup("Для аптеки", 284, 8, 265, 193) $Checkbox8 = GUICtrlCreateCheckbox("1С Предприятие v7.7", 296, 32, 145, 17) $Checkbox10 = GUICtrlCreateCheckbox("Мастер удаленного подключения", 296, 56, 217, 17) $Checkbox11 = GUICtrlCreateCheckbox("Драйвер Штрих-М ", 296, 80, 121, 17) $Checkbox13 = GUICtrlCreateCheckbox("Драйвер Сканера Штрих кода", 296, 104, 233, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Button1 = GUICtrlCreateButton("Ну с богом", 432, 208, 107, 25, 0) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit EndSwitch WEnd |
|
Отправлено: 12:39, 21-04-2009 |
Старожил Сообщения: 460
|
Профиль | Отправить PM | Цитировать можно так:
#region: - Options Opt('GUIOnEventMode', 1) ;~ Opt('MustDeclareVars', 1); Opt('TrayIconDebug', 1) Opt('TrayIconHide', 0) #endregion #include <GUIConstants.au3> ;~ #include "название AutoIt файла установки Office 2003"; файл должен находится рядом с этим файлом (в одной папке)ю либо весь код из этого файла перекопировать сразу сюда, в функцию _Install_Office2003() ;~ #include "название AutoIt файла установки FireFox" ;~ и т.д. по всем файлам авто-установки $Form1 = GUICreate("Form1", 554, 240, -1, -1) GUISetOnEvent($GUI_EVENT_CLOSE, '_Pro_Exit') GUICtrlCreateGroup("Для офиса", 8, 8, 265, 196) $Checkbox1 = GUICtrlCreateCheckbox("Microsoft Office 2003", 24, 56, 169, 17) $Checkbox2 = GUICtrlCreateCheckbox("Mazillla FireFox", 24, 80, 97, 17) $Checkbox3 = GUICtrlCreateCheckbox("Foxit PDF Reader", 24, 104, 97, 17) $Checkbox4 = GUICtrlCreateCheckbox("ICQ", 24, 128, 97, 17) $Checkbox5 = GUICtrlCreateCheckbox("Total Commander", 24, 152, 121, 17) $Checkbox7 = GUICtrlCreateCheckbox("The Bat!", 24, 176, 97, 17) $Checkbox9 = GUICtrlCreateCheckbox("1С Предприятие v8.1", 24, 32, 169, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) GUICtrlCreateGroup("Для аптеки", 284, 8, 265, 193) $Checkbox8 = GUICtrlCreateCheckbox("1С Предприятие v7.7", 296, 32, 145, 17) $Checkbox10 = GUICtrlCreateCheckbox("Мастер удаленного подключения", 296, 56, 217, 17) $Checkbox11 = GUICtrlCreateCheckbox("Драйвер Штрих-М ", 296, 80, 121, 17) $Checkbox13 = GUICtrlCreateCheckbox("Драйвер Сканера Штрих кода", 296, 104, 233, 17) GUICtrlCreateGroup("", -99, -99, 1, 1) $Button1 = GUICtrlCreateButton("Ну с богом", 432, 208, 107, 25, 0) GUICtrlSetOnEvent(-1, '_Start_Install') GUISetState(@SW_SHOW) #region: - Sleep, Exit, OnAutoItExit While 1 Sleep(10) WEnd Func _Pro_Exit() Exit EndFunc #endregion Func _Start_Install() If BitAnd($Checkbox1, 1) Then _Install_Office2003() If BitAnd($Checkbox2, 1) Then _Install_FireFox() ;~ и т.д. по всем чекбоксам EndFunc Func _Install_Office2003() ;~ Вывзов функции установки Office 2003 EndFunc Func _Install_FireFox() ;~ Вывзов функции установки FireFox EndFunc |
------- Отправлено: 13:05, 21-04-2009 | #2 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Новый участник Сообщения: 2
|
Профиль | Отправить PM | Цитировать Спасибо попробую
|
Отправлено: 13:35, 21-04-2009 | #3 |
Must AutoIt Сообщения: 3054
|
Профиль | Сайт | Отправить PM | Цитировать Alex_a_ndr,
Заключайте пожалуйста куски кода в соответствующие теги. |
------- Отправлено: 15:15, 21-04-2009 | #4 |
![]() |
Участник сейчас на форуме |
![]() |
Участник вне форума |
![]() |
Автор темы |
![]() |
Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
Что за программка такая? | Amistoso | Хочу все знать | 12 | 06-12-2009 22:35 | |
C/C++ - [решено] простейшая программка.... помогите пожалуйста | DruOleg | Программирование и базы данных | 5 | 12-07-2008 02:21 | |
Моя программка - БД по ключикам установки. | alex_84 | Автоматическая установка приложений | 6 | 21-05-2008 08:28 | |
программка поиска картинок | Stin | Защита компьютерных систем | 3 | 22-09-2005 15:16 | |
Программка для печати из MS-DOS | Boets | Программирование и базы данных | 2 | 06-01-2004 14:17 |
|