Войти
NeoBooker.ru
Добро пожаловать к нам в гости!
Наш сайт посвящён программе NeoBook, с помощью которой вы легко сможете создавать собственные мультимедиа-приложения без необходимости изучать сложные языки программирования! Зарегистрируйтесь, чтобы стать членом нашего сообщества.
  • Страница 1 из 1
  • 1
Модератор форума: Peter, DEMBEL  
Форум NeoBook » Всё о программе NeoBook » Мир NeoBook » Управление системными службами из проекта (Готовая VBScript-функция для управления службами)
Управление системными службами из проекта
DEMBELДата: Чт, 27 Августа 2009, 16:41 | Сообщение # 1
Наш дизайнер
Итакс, любителям лазить в системных службах винды.
Вот вам для тестирования простая функция для управления службами, она умеет:
- Управлять состоянием службы (Запустить/Остановить)
- Устанавливать тип запуска службы (Авто/Вручную/Отключено)
Функцию положить в .../Functions/VBScript Examples
Управляется через строковые переменные:
1) [Flag]: Active = показать список активных служб (запущенных)
Inactive = показать список неактивных служб (незапущенных и/или отключенных)
2) [Name]: Сюда вписываем системное имя службы
В демо-примере сюда автоматом заносится переменная из строки ввода [StringL]
Системные имена служб посмотреть в списке в левом столбце и ввести вручную в строку ввода. Если имя службы вам известно, просто укажите его.

3) [Action]: Stop = остановить службу, Start = запустить службу
4) [Start_type]: Automatic = установить тип запуска службы как "Авто"
Manual = установить тип запуска службы как "Вручную"
Disabled = установить тип запуска службы как "Отключено"

P.S: защита от дурака есть, но небольшая, поэтому не извращайтесь (не пытайтесь запускать службу и ставить тип запуска отключено и т.д...) а то вылезут ошибки.
В режиме вывода списка в полях 2),3),4) ничего не указывать.
В режиме управления службами в поле 1) ничего не указывать, поля 2),3),4) должны быть заполнены.

Тестируем...

Прикрепления: ServiceControl_.zip (3.6 Kb)


Как задавать вопросы

Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
СообщениеИтакс, любителям лазить в системных службах винды.
Вот вам для тестирования простая функция для управления службами, она умеет:
- Управлять состоянием службы (Запустить/Остановить)
- Устанавливать тип запуска службы (Авто/Вручную/Отключено)
Функцию положить в .../Functions/VBScript Examples
Управляется через строковые переменные:
1) [Flag]: Active = показать список активных служб (запущенных)
Inactive = показать список неактивных служб (незапущенных и/или отключенных)
2) [Name]: Сюда вписываем системное имя службы
В демо-примере сюда автоматом заносится переменная из строки ввода [StringL]
Системные имена служб посмотреть в списке в левом столбце и ввести вручную в строку ввода. Если имя службы вам известно, просто укажите его.

3) [Action]: Stop = остановить службу, Start = запустить службу
4) [Start_type]: Automatic = установить тип запуска службы как "Авто"
Manual = установить тип запуска службы как "Вручную"
Disabled = установить тип запуска службы как "Отключено"

P.S: защита от дурака есть, но небольшая, поэтому не извращайтесь (не пытайтесь запускать службу и ставить тип запуска отключено и т.д...) а то вылезут ошибки.
В режиме вывода списка в полях 2),3),4) ничего не указывать.
В режиме управления службами в поле 1) ничего не указывать, поля 2),3),4) должны быть заполнены.

Тестируем...


Автор - DEMBEL
Дата добавления - 27 Августа 2009 в 16:41
СергейДата: Чт, 27 Августа 2009, 17:04 | Сообщение # 2
Необукер
Quote (DEMBEL)
простая функция для управления службами, она умеет:
Ничего себе, молодец, стока функций...
Решил остановится на ручном забивании сервиса?
 
Сообщение
Quote (DEMBEL)
простая функция для управления службами, она умеет:
Ничего себе, молодец, стока функций...
Решил остановится на ручном забивании сервиса?

Автор - Сергей
Дата добавления - 27 Августа 2009 в 17:04
DEMBELДата: Чт, 27 Августа 2009, 17:15 | Сообщение # 3
Наш дизайнер
Quote (sp3d)
Решил остановится на ручном забивании сервиса?

пока да, потом доразбираюсь... я и эту то функцию еле-еле заставил работать. Да, некоторые службы могут не отключаться (заблокированы или нет прав?), такие как службы антивирусов и еще некоторые...


Как задавать вопросы

Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
Сообщение
Quote (sp3d)
Решил остановится на ручном забивании сервиса?

пока да, потом доразбираюсь... я и эту то функцию еле-еле заставил работать. Да, некоторые службы могут не отключаться (заблокированы или нет прав?), такие как службы антивирусов и еще некоторые...

Автор - DEMBEL
Дата добавления - 27 Августа 2009 в 17:15
СергейДата: Чт, 27 Августа 2009, 17:25 | Сообщение # 4
Необукер
Quote (DEMBEL)
могут не отключаться (заблокированы или нет прав?), такие как службы антивирусов и еще некоторые...
и как их попбороть?!
 
Сообщение
Quote (DEMBEL)
могут не отключаться (заблокированы или нет прав?), такие как службы антивирусов и еще некоторые...
и как их попбороть?!

Автор - Сергей
Дата добавления - 27 Августа 2009 в 17:25
DEMBELДата: Чт, 27 Августа 2009, 17:33 | Сообщение # 5
Наш дизайнер
Quote (sp3d)
и как их попбороть?!

отключить в антивирусах самозащиту...
Quote (DEMBEL)
Да, некоторые службы могут не отключаться

ну это предположение, лично у меня в системе все что надо отключается и включается.


Как задавать вопросы

Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
Сообщение
Quote (sp3d)
и как их попбороть?!

отключить в антивирусах самозащиту...
Quote (DEMBEL)
Да, некоторые службы могут не отключаться

ну это предположение, лично у меня в системе все что надо отключается и включается.

Автор - DEMBEL
Дата добавления - 27 Августа 2009 в 17:33
СергейДата: Чт, 27 Августа 2009, 17:43 | Сообщение # 6
Необукер
Quote (DEMBEL)
ну это предположение, лично у меня в системе все что надо отключается и включается.
хорошо, протестю отпишусь...
 
Сообщение
Quote (DEMBEL)
ну это предположение, лично у меня в системе все что надо отключается и включается.
хорошо, протестю отпишусь...

Автор - Сергей
Дата добавления - 27 Августа 2009 в 17:43
Alex3AДата: Чт, 27 Августа 2009, 18:07 | Сообщение # 7
Друг клуба ММВ
Есть много сервисов, которые можно отключить и они не будут возмущаться,
но делов вы наделаете. Так что надо иметь представление что вы включаете и выключаете, и с дурной головой туда лезть не рекомендую.
Если что то не дает отключить сервис, эт не просто так, если у вас нет прав,
то это не нашару, получи права. Если там поработал вирус, это совсем иная тема,
и иные методы борьбы. Но, считаю хорошим тоном, иметь представление какие сервисы
у вас стоят и работают. А так же регулярно смотреть что там у вас поменялось.
Как правило, все подписанные сервисы мелкософта, тут надо проверять не влючило что либо отключенный тобой ранее сервис. Сервисы без описания, ставят иные
производители, их проверять в первую очередь. Запущенный системный сервис то же
может представлять угрозу, к примеру удаленное управление реестром, и так далее.
 
СообщениеЕсть много сервисов, которые можно отключить и они не будут возмущаться,
но делов вы наделаете. Так что надо иметь представление что вы включаете и выключаете, и с дурной головой туда лезть не рекомендую.
Если что то не дает отключить сервис, эт не просто так, если у вас нет прав,
то это не нашару, получи права. Если там поработал вирус, это совсем иная тема,
и иные методы борьбы. Но, считаю хорошим тоном, иметь представление какие сервисы
у вас стоят и работают. А так же регулярно смотреть что там у вас поменялось.
Как правило, все подписанные сервисы мелкософта, тут надо проверять не влючило что либо отключенный тобой ранее сервис. Сервисы без описания, ставят иные
производители, их проверять в первую очередь. Запущенный системный сервис то же
может представлять угрозу, к примеру удаленное управление реестром, и так далее.

Автор - Alex3A
Дата добавления - 27 Августа 2009 в 18:07
СергейДата: Чт, 27 Августа 2009, 18:25 | Сообщение # 8
Необукер
Quote (Alex3A)
и с дурной головой туда лезть не рекомендую.
Согласен
В первой задачи у мну все понятно, там включается\отключается без проблем. А со второй не катит, я писал в одной теме-это антивирь, вот чтоб мне запихать логин не окрывая прогу, через реестр, мне надо вырубить сервис, а он не хочет. попробую функцию DEMBELя если не прокатит, то заброшу эту затею.
 
Сообщение
Quote (Alex3A)
и с дурной головой туда лезть не рекомендую.
Согласен
В первой задачи у мну все понятно, там включается\отключается без проблем. А со второй не катит, я писал в одной теме-это антивирь, вот чтоб мне запихать логин не окрывая прогу, через реестр, мне надо вырубить сервис, а он не хочет. попробую функцию DEMBELя если не прокатит, то заброшу эту затею.

Автор - Сергей
Дата добавления - 27 Августа 2009 в 18:25
DEMBELДата: Чт, 27 Августа 2009, 18:39 | Сообщение # 9
Наш дизайнер
Quote (sp3d)
мне надо вырубить сервис

если кис/кав или авира то выруби самозащиту


Как задавать вопросы

Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
Сообщение
Quote (sp3d)
мне надо вырубить сервис

если кис/кав или авира то выруби самозащиту

Автор - DEMBEL
Дата добавления - 27 Августа 2009 в 18:39
Alex3AДата: Чт, 27 Августа 2009, 18:46 | Сообщение # 10
Друг клуба ММВ
Quote (sp3d)
через реестр, мне надо вырубить сервис, а он не хочет. попробую функцию DEMBELя если не прокатит, то заброшу эту затею

Выполнить в командной строке.
net stop имя сервиса.
net start имя сервиса.

Добавлено (27 Август 2009, 18:46)
---------------------------------------------
В реестре можно снять запрет.

 
Сообщение
Quote (sp3d)
через реестр, мне надо вырубить сервис, а он не хочет. попробую функцию DEMBELя если не прокатит, то заброшу эту затею

Выполнить в командной строке.
net stop имя сервиса.
net start имя сервиса.

Добавлено (27 Август 2009, 18:46)
---------------------------------------------
В реестре можно снять запрет.


Автор - Alex3A
Дата добавления - 27 Августа 2009 в 18:46
СергейДата: Чт, 27 Августа 2009, 19:29 | Сообщение # 11
Необукер
Quote (Alex3A)
В реестре можно снять запрет
вот это интересно, я в сети ничего путного не нашел, правда я искал снятие ограничений программно
pardon
 
Сообщение
Quote (Alex3A)
В реестре можно снять запрет
вот это интересно, я в сети ничего путного не нашел, правда я искал снятие ограничений программно
pardon

Автор - Сергей
Дата добавления - 27 Августа 2009 в 19:29
DEMBELДата: Чт, 27 Августа 2009, 19:43 | Сообщение # 12
Наш дизайнер
Алекс имеет в виду что запрет на изменение накладывается на ветку в реестре, отвечающую за статус служб, вот этот запрет ветки и можно снять.

Как задавать вопросы

Win7x64 SP1 Neobook v5.70 (Trial)
WinXP SP3 Neobook v5.62
 
СообщениеАлекс имеет в виду что запрет на изменение накладывается на ветку в реестре, отвечающую за статус служб, вот этот запрет ветки и можно снять.

Автор - DEMBEL
Дата добавления - 27 Августа 2009 в 19:43
Alex3AДата: Пт, 28 Августа 2009, 09:42 | Сообщение # 13
Друг клуба ММВ
Quote (sp3d)
я в сети ничего путного не нашел

Ну нету слов для выражения..
Сетка забита инфой о реестре, многие вирусы используют эту фичу, и где это находиться и как побороть широко описано.
 
Сообщение
Quote (sp3d)
я в сети ничего путного не нашел

Ну нету слов для выражения..
Сетка забита инфой о реестре, многие вирусы используют эту фичу, и где это находиться и как побороть широко описано.

Автор - Alex3A
Дата добавления - 28 Августа 2009 в 09:42
Форум NeoBook » Всё о программе NeoBook » Мир NeoBook » Управление системными службами из проекта (Готовая VBScript-функция для управления службами)
  • Страница 1 из 1
  • 1
Поиск: