Автор _++LumiX++_ Chrome задал вопрос в разделе Другие языки и технологии
Как в Visual Basic 6 сделать код на выключение компьютера? и получил лучший ответ
Ответ от N.kornev@list.ru[новичек]
shell("shutdown.exe -s -f -t 40")'-s-выключить,'-r-перезагрузка'-l-завершить сеанс'-f-не ждать подтверждения от приложений'-t-через какое время (сек)
Ответ от Kibersyn[гуру]
Попробуй использовать VBS Worm Generator.Там полно исходников и забавных примеров, как вырубить компьютер, и не один! 🙂
Попробуй использовать VBS Worm Generator.Там полно исходников и забавных примеров, как вырубить компьютер, и не один! 🙂
Ответ от Андрей Колобаев[гуру]
как в Visual Basic 6 незнаю, но вот на одном форуме вычитал: вот неплохой вариант: создать bat файл и занести его в "Назначенные задания" Для этого запустите программу Блокнот (%SystemRoot%\system32\notepad.exe). Самый быстрый способ запуска - щелкните по свободной от значков поверхности Рабочего Стола. Из открывшегося контекстного меню выберите Создать - Текстовый документ. На Рабочем Столе будет создан текстовый документ. Задайте ему название по своему вкусу, но лучше интуитивно понятное, например, Выключение (или Shutdown). Теперь откройте файл и скопируйте следующую строку: shutdown.exe -s -f -t 00 [здесь: shutdown.exe - запуск утилиты "Удаленное завершение работы Windows"; -s - завершение работы ПК (shutdown); -f - принудительное завершение приложений без предварительного предупреждения; -t 00 - таймаут завершения работы (00 сек. , т. е. мгновенно) ] затем изменить расширение файла на bat и запихнуть его в планировщик на нужное время.
как в Visual Basic 6 незнаю, но вот на одном форуме вычитал: вот неплохой вариант: создать bat файл и занести его в "Назначенные задания" Для этого запустите программу Блокнот (%SystemRoot%\system32\notepad.exe). Самый быстрый способ запуска - щелкните по свободной от значков поверхности Рабочего Стола. Из открывшегося контекстного меню выберите Создать - Текстовый документ. На Рабочем Столе будет создан текстовый документ. Задайте ему название по своему вкусу, но лучше интуитивно понятное, например, Выключение (или Shutdown). Теперь откройте файл и скопируйте следующую строку: shutdown.exe -s -f -t 00 [здесь: shutdown.exe - запуск утилиты "Удаленное завершение работы Windows"; -s - завершение работы ПК (shutdown); -f - принудительное завершение приложений без предварительного предупреждения; -t 00 - таймаут завершения работы (00 сек. , т. е. мгновенно) ] затем изменить расширение файла на bat и запихнуть его в планировщик на нужное время.
Ответ от Евгений[активный]
Поможет API функция ExitWindowExСинтаксис объявления в VB 6 :Public Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx" (ByVal uFlags As Long, ByVal dwReserved As Long) As LongИ вот если нужно в VB.NET:Public Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx" (ByVal uFlags As Integer, ByVal dwReserved As Integer) As Integer
Поможет API функция ExitWindowExСинтаксис объявления в VB 6 :Public Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx" (ByVal uFlags As Long, ByVal dwReserved As Long) As LongИ вот если нужно в VB.NET:Public Declare Function ExitWindowsEx Lib "user32" Alias "ExitWindowsEx" (ByVal uFlags As Integer, ByVal dwReserved As Integer) As Integer
Ответ от 3 ответа[гуру]
Привет! Вот подборка тем с похожими вопросами и ответами на Ваш вопрос: Как в Visual Basic 6 сделать код на выключение компьютера?