Форум программистов, компьютерный форум, киберфорум
Visual Basic
Войти
Регистрация
Восстановить пароль
 
Рейтинг 4.77/13: Рейтинг темы: голосов - 13, средняя оценка - 4.77
1 / 1 / 0
Регистрация: 30.03.2011
Сообщений: 44
1

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

18.05.2011, 15:54. Просмотров 2471. Ответов 1
Метки нет (Все метки)

Есть коды для XP, чтобы выключать и перезагружать компьютер. А как это сделать в 7 Windows?
Visual Basic
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Dim strComputer As String
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate, (Shutdown)}!\\" & strComputer & "\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery( "Select * from Win32_OperatingSystem")
For Each ObjOperatingSystem In colOperatingSystems
ObjOperatingSystem.Reboot ' Для перезагрузки
Next
'и…
Dim strComputer As String
strComputer = "."
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate,(Shutdown)}!\\" & strComputer & "\root\cimv2")
Set colOperatingSystems = objWMIService.ExecQuery( "Select * from Win32_OperatingSystem")
For Each ObjOperatingSystem In colOperatingSystems
ObjOperatingSystem.ShutDown 'Для выключения
Next
Помогите!
0
Programming
Эксперт
94731 / 64177 / 26122
Регистрация: 12.04.2006
Сообщений: 116,782
18.05.2011, 15:54
Ответы с готовыми решениями:

Как включить/выключить/перезагрузить компьютер на Network?
Kak vkluchit'' , vikluchit'' and Restart computer na Network? Zaranie spasibo. irina

Как выключить компьютер в Windows XP?
Как выключить компьютер в Windows XP?

Как выключить{Перезагрузить} Комп из VBA?
Скажите, если не сложно, как выключить{Перезагрузить} Комп из VBA Желательно пример и возможность...

Как из программы на VB перезагрузить Windows NT?
Приветствую всех! Нужно из программы на VB перезагрузить Windows NT без ожидания завершения всех...

1
747 / 546 / 48
Регистрация: 17.06.2010
Сообщений: 1,039
Записей в блоге: 1
18.05.2011, 21:21 2
Visual Basic
1
Shell "Shutdown -s -t 1"
Visual Basic
1
Shell "Shutdown -r -t 1"
0
IT_Exp
Эксперт
87844 / 49110 / 22898
Регистрация: 17.06.2006
Сообщений: 92,604
18.05.2011, 21:21

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Не могу перезагрузить и выключить компьютер
Привет всем! Нужна помощь. Никак не могу перезагрузить и выключить компьютер. У меня стоит Chip...

Как программно перезагрузить или выключить телефон?
У меня Nokia E52 ( Symbian 9.3) Python for Symbian 1.4.5 Final ---------------------- Питоном...

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

Не могу выключить или перезагрузить из панели Пуска
Всем Здрасти. У меня Windows XP S.P 3 Zver DVD.Вот...ось хорошая без багов,тока вот чо то какая то...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2021, vBulletin Solutions, Inc.