Вопрос № 110561: Извините возможно мой вопрос слишком прост, ноя совсем новичок поэтому интересуюсь. Каким програмным кодом с помощью VB 6 вызвать перезагрузку компа и как вызвать его отключение? Если возможно посоветуйте где можно скачать толковое руководство по VB ...
Вопрос № 110.561
Извините возможно мой вопрос слишком прост, ноя совсем новичок поэтому интересуюсь. Каким програмным кодом с помощью VB 6 вызвать перезагрузку компа и как вызвать его отключение? Если возможно посоветуйте где можно скачать толковое руководство по VB 6. Заранее спасибо
Приложение:
Отправлен: 22.11.2007, 17:32
Вопрос задал: Sjerj (статус: Посетитель)
Всего ответов: 1 Мини-форум вопроса >>> (сообщений: 1)
Отвечает: Черников Игорь Владимирович
Здравствуйте, Sjerj!
Из справочника по VB6
Как перезагрузить Windows
Разместите в модуле:
Public Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Public Const EWX_LOGOFF = 0
Public Const EWX_SHUTDOWN = 1
Public Const EWX_REBOOT = 2
Public Const EWX_FORCE = 4
А это в коде:
Dim s As Long 'Так можно сделать Shut down
s = ExitWindowsEx(EWX_SHUTDOWN, 0&) 'Так можно сделать Log off
s = ExitWindowsEx(EWX_LOGOFF, 0&) 'А так Reboot
s = ExitWindowsEx(EWX_REBOOT, 0&)
--------- От каждого по способностям, каждому по труду