Мой Kbyte.Ru
Рассылка Kbyte.Ru
Группы на Kbyte.Ru
Партнеры Kbyte.Ru
Реклама
Сделано руками
Сделано руками
> Исходные коды - aero122 -

Visual Basic .NET - Система

Все примеры / Система

Как выключить/перезагрузить компьютер?

Автор: aero122 | добавлено: 22.02.2011, 14:52 | просмотров: 4117 (1+) | комментариев: 0 | рейтинг: *x6
Простой пример показывает, как в Visual Basic .NET можно выключить или перезагрузить компьютер под управлением Windows.

Код

Dim objWMIService, objComputer As Object 
objWMIService = GetObject("Winmgmts:{impersonationLevel=impersonate,(Debug,Shutdown)}") 

For Each objComputer In objWMIService.InstancesOf("Win32_OperatingSystem") 
 objComputer.Win32shutdown(12, 0) '12 - выключить компьютер, 2 - перезагрузить
Next 

'полный список значений, которые можно использовать
'0  (0x0)             - Log Off
'4  (0x4)             - Forced Log Off (0 + 4)
'1  (0x1)             - Shutdown
'5  (0x5)             - Forced Shutdown (1 + 4)
'2  (0x2)             - Reboot
'6  (0x6)             - Forced Reboot (2 + 4)
'8  (0x8)             - Power Off
'12  (0xC)          - Forced Power Off (8 + 4)
Об авторе

aero122

Нет информации об авторе...

См. также:
Профиль автора
aero122
Последние комментарии (всего: 0)

Добавлять комментарии могут только зарегистрированные пользователи сайта.
Если у Вас уже есть учетная запись на Kbyte.Ru, пройдите процедуру авторизации OpenID.
Если Вы еще не зарегистрированы на Kbyte.Ru - зарегистрируйтесь.


Нет комментариев...

Авторизация
 
OpenID
Зарегистрируйся и получи 10% скидку на добавление своего сайта в каталоги! Подробнее »
Поиск по сайту
Реклама
Счетчики