Совершенная розыгрыш выключения компьютера: 3 шага

2025 Автор: John Day | [email protected]. Последнее изменение: 2025-01-23 15:04

Это сценарий выключения.vbs, который я сделал для шутки. Причина, по которой это так круто, заключается в том, что вместо того, чтобы сразу выключить компьютер, компьютер говорит с вами, предупреждая вас, что компьютер выключится через 10 секунд, а затем показывает небольшую анимацию, отсчитывающую последние 5 секунд перед он выключил компьютер.

Мне также нравится компилировать его в.exe с помощью конвертера, но вам не обязательно этого делать. Просмотрите мою блокировку экрана vbs, если вы хотите знать, как это сделать. В этом руководстве также есть ссылки на редакторы vbs.

Но в отличие от моей блокировки экрана, эта программа намного короче, поэтому я постараюсь объяснить ее как можно лучше.

ПРИМЕЧАНИЕ. Если вы еще не знакомы с vbs, я рекомендую ознакомиться с этим руководством, чтобы у вас было базовое представление о некоторых функциях, используемых в этом сценарии.

Шаг 1. Мой сценарий…

Вот сценарий..

Вам нужно будет удалить один из «s» в конце, чтобы он заканчивался на «Shutdown.vbs» или что угодно, если он заканчивается на.vbs.

Шаг 2: Мой сценарий (объяснение)…

Знайте, я объясню код …

Первая строка на самом деле мало что делает, она просто помогла мне, когда я создавал сценарий. Вот следующие три строчки:

Dim IntCounterDim objWshShl: Установить objWshShl = WScript. CreateObject ("wscript.shell") Dim objVoice: Установить objVoice = WScript. CreateObject ("sapi.spvoice")

В первой строке кода объявляется переменная, которую мы будем использовать для управления, - это For… Next Loop. В следующих двух строках кода объявляются и устанавливаются 2 переменные. objWshShl используется для окна сообщения и функций запуска. objVoice используется для того, чтобы компьютер «разговаривал».

Вот еще три строчки:

ShutdownWarning () TimedMessageBox () ShutdownComputer ()

Эти строки просто вызывают три функции, которые есть в нашем скрипте.

Вот первая функция в скрипте.

Функция ShutdownWarning objVoice. Speak «Этот компьютер теперь выключится через 10 секунд». Функция завершения WScript. Sleep 5000

На самом деле нам не нужны функции в нашем скрипте, но он просто помогает упорядочить вещи.

Таким образом, все, что он делает, это произносит предложение между кавычками, а затем делает паузу на 5 секунд, прежде чем перейти к следующей функции.

Следующая часть может показаться сложной, но на самом деле ее довольно легко понять:

Функция TimedMessageBox For IntCounter = 5 To 1 Step -1 objWshShl. Popup "Компьютер выключится через" _ & IntCounter & "секунд", 1, "Выключение компьютера", 0 + 48 Функция следующего конца

Итак, сначала он создает функцию с именем TimedMessageBox.

Следующие 4 строки - это цикл For… Next. Таким образом, этот цикл будет повторяться пять раз, каждый раз уменьшаясь на один.

objWshShl. Popup "Компьютер выключится через" _ & IntCounter & "секунды", 1, "Выключение компьютера", 0 + 48

Этот код на самом деле представляет собой только одну строку кода, он просто разделен на другую строку с помощью символа «_», чтобы его было легче читать. Этот код создает всплывающее сообщение, которое длится 1 секунду и отображает количество секунд, оставшихся до завершения работы, с использованием переменной IntCounter.

Как только этот цикл повторяется пять раз, он продолжает выполнение сценария.

Вот следующая функция:

Функция ShutdownComputer objWshShl. Run "Shutdown / s / f / t 0", 0 End Function

Все, что это делает, - это выключение компьютера с помощью команды запуска. Вот используемые переключатели: / s / f / t. / S означает завершение работы, / f означает закрытие всех приложений без предупреждения, / t - время в секундах до завершения работы. Вы заметите, что после этой команды стоит ноль запятой ", 0". Это просто делает так, что никакая вдова cmd не мигает при выполнении команды выключения.

Шаг 3. Надеюсь, это было полезно

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