A végső számítógép leállítási tréfa: 3 lépés

2025 Szerző: John Day | [email protected]. Utoljára módosítva: 2025-01-23 14:47

Ez egy.vbs leállítási szkript, amelyet tréfaként készítettem. Az ok, amiért ilyen menő, az az, hogy ahelyett, hogy a számítógépet azonnal leállítaná, a számítógép szól hozzád, figyelmeztetve, hogy a számítógép 10 másodperc múlva leáll, majd egy kis animációt mutat, amely visszaszámolja az utolsó 5 másodpercet leállította a számítógépet.

Szeretem azt is.exe -re fordítani konverter segítségével, de ezt nem kell megtenni. Tekintse meg a vbs Képernyőzár funkciót, ha szeretné tudni, hogyan kell ezt megtenni. Vannak linkek a vbs szerkesztők számára is, amelyek abban az oktatható útmutatóban találhatók.

De a képernyőzárral ellentétben ez a program sokkal rövidebb, ezért megpróbálom a lehető legjobban elmagyarázni.

MEGJEGYZÉS: Ha még nem ismeri a vbs -t, akkor javaslom, hogy nézze meg ezt az Instructable -t, hogy megértse néhány használt funkciót, ez a szkript.

1. lépés: A szkriptem…

Itt a forgatókönyv..

Törölnie kell az egyik "s" -et a végén, hogy az "Shutdown.vbs" -re végződjön, vagy amit akar, amíg.vbs -re végződik.

2. lépés: A szkriptem (magyarázat)…

Szóval tudd, elmagyarázom a kódot…

Az első sor nem sokat tesz, csak segített nekem a forgatókönyv létrehozásakor. Íme a következő három sor:

Dim IntCounterDim objWshShl: Állítsa be az objWshShl = WScript. CreateObject ("wscript.shell") Dim objVoice: Set objVoice = WScript. CreateObject ("sapi.spvoice")

A kód első sora deklarálja azt a változót, amelyet a vezérléshez használunk: For… Next Loop. A következő két sor kód 2 változót deklarál és állít be. Az objWshShl az üzenetmező és a futtatási funkciókhoz használatos. Az objVoice segítségével a számítógép "beszél".

Itt van még három sor:

ShutdownWarning () TimedMessageBox () ShutdownComputer ()

Ezek a sorok csak a szkriptünkben szereplő három függvényt hívják meg.

Itt található az are script első funkciója.

Funkció ShutdownWarning objVoice. Speak "Ez a számítógép most 10 másodperc múlva leáll." WScript. Sleep 5000 End Function

Valójában nincs szükségünk funkciókra a szkriptünkben, de csak segít a dolgok rendszerezésében.

Mindez tehát az, hogy a mondatot az idézőjelek között mondja ki, majd 5 másodperc szünetet tart, mielőtt folytatná a következő funkciót.

Ez a következő rész kissé bonyolultnak tűnhet, de valójában nagyon könnyű megérteni:

Funkció TimedMessageBox IntCounter = 5 -1 1. lépés objWshShl. Popup "A számítógép leáll" _ & IntCounter & "másodperc", 1, "Számítógép leállítás", 0+48 Következő vége funkció

Tehát először létrehozza a TimedMessageBox nevű függvényt.

Ezután a következő 4 sor a For… Next Loop. Tehát ez a hurok ötször fog ciklusba menni, minden alkalommal eggyel lejjebb.

objWshShl. Popup "A számítógép" _ & IntCounter & "másodperc múlva leáll, 1," Számítógép leállítás ", 0+48

Ez a kód valójában csak egy kódsor, csak egy "_" karakterrel van szétválasztva egy másik sorra az olvasás megkönnyítése érdekében. Ez a kód az, hogy létrehoz egy felugró üzenetet, amely 1 másodpercig mutatja az IntCounter változó segítségével a leállásig hátralévő másodperceket.

Miután ez a ciklus ötször ismétlődik, folytatódik a szkripttel.

Itt a következő funkció:

Funkció ShutdownComputer objWshShl. Run "Shutdown /s /f /t 0", 0 End Function

Mindez csak leállítja a számítógépet egy futtatási paranccsal. Itt vannak a használt kapcsolók: /s /f /t. A /s azt jelenti, hogy leáll, a /f azt jelenti, hogy minden alkalmazást figyelmeztetés nélkül bezár, a /t pedig a leállás előtti idő másodpercben. A parancs után észreveszi, hogy vessző nulla ", 0". Ez csak annyit tesz, hogy egyetlen cmd özvegy sem villog a leállítási parancs végrehajtásakor.

3. lépés: Remélem, ez hasznos volt

Remélem, ez az Instructable hasznos volt, ha további segítségre van szüksége, vagy kérdése van, írjon nekem, vagy hagyjon megjegyzést.