Obsah:
Video: The Ultimate Computer Shutdown Prank: 3 Steps
2024 Autor: John Day | [email protected]. Naposledy zmenené: 2024-01-30 11:56
Toto je skript vypínania.vbs, ktorý som urobil ako žart. Dôvod, prečo je taký úžasný, je ten, že namiesto toho, aby ste počítač okamžite vypli, k vám prehovorí a upozorní vás, že sa počítač vypne do 10 sekúnd, a potom zobrazí malú animáciu, ktorá odpočítava posledných 5 sekúnd pred vypol počítač.
Tiež sa mi páči kompilácia do súboru.exe pomocou prevodníka, ale nemusíte to robiť. Ak chcete vedieť, ako to urobiť, pozrite si môj zámok obrazovky vbs. V tomto návode je tiež niekoľko odkazov na editory vbs.
Na rozdiel od zámku obrazovky je však tento program oveľa kratší, takže sa ho pokúsim vysvetliť čo najlepšie.
POZNÁMKA: Ak ešte neviete vbs, odporúčam vám pozrieť si tento návod, aby ste získali základné znalosti o niektorých použitých funkciách, ktorými je tento skript.
Krok 1: Môj skript…
Tu je scenár..
Na konci budete musieť odstrániť jedno z písmen „s“, aby sa skončilo na „Shutdown.vbs“alebo na čomkoľvek inom, pokiaľ končí na.vbs.
Krok 2: Môj skript (vysvetlenie)…
Vedzte, že kód vysvetlím …
Prvý riadok toho vlastne veľa neznamená, iba mi to pomohlo pri vytváraní scenára. Tu sú nasledujúce tri riadky:
Dim IntCounterDim objWshShl: Set objWshShl = WScript. CreateObject ("wscript.shell") Dim objVoice: Set objVoice = WScript. CreateObject ("sapi.spvoice")
Prvý riadok kódu deklaruje premenné, ktoré použijeme na ovládanie, sú For… Next Loop. Nasledujúce dva riadky kódu deklarujú a nastavujú 2 premenné. objWshShl sa používa pre funkcie okna so správou a spúšťania. objVoice sa používa na to, aby počítač „rozprával“.
Tu sú ďalšie tri riadky:
ShutdownWarning () TimedMessageBox () ShutdownComputer ()
Tieto riadky práve volajú tri funkcie, ktoré sú v našom skripte.
Tu je prvá funkcia v sú skriptu.
Funkcia ShutdownWarning objVoice. Speak "Tento počítač sa teraz vypne o 10 sekúnd." Funkcia WScript. Sleep 5000 End
V našom scenári nepotrebujeme funkcie, ale len pomáha udržiavať poriadok.
Všetko, čo musíte urobiť, je povedať vetu medzi úvodzovkami a potom sa na 5 sekúnd pozastaviť, než prejdete na ďalšiu funkciu.
Táto ďalšia časť sa môže zdať trochu zložitá, ale v skutočnosti je celkom ľahké ju pochopiť:
Funkcia TimedMessageBox pre IntCounter = 5 až 1 krok -1 objWshShl. Popup "Počítač sa vypne za" _ & IntCounter & "sekúnd", 1, "Vypnutie počítača", 0+48 Nasledujúca koncová funkcia
Najprv teda vytvorí funkciu s názvom TimedMessageBox.
Potom sú nasledujúce 4 riadky slučkou For… Next. Táto slučka sa teda bude opakovať päťkrát a zakaždým sa zníži o jednu.
objWshShl. Popup "Počítač sa vypne za" _ & IntCounter & "sekúnd", 1, "Vypnutie počítača", 0+48
Tento kód je v skutočnosti iba jedným riadkom kódu, je len oddelený do iného riadka pomocou znaku „_“, aby bol čitateľnejší. Tento kód robí, že vytvorí kontextovú správu, ktorá trvá 1 sekundu a zobrazuje počet sekúnd, ktoré zostávajú do vypnutia, pomocou premennej IntCounter.
Keď sa táto slučka päťkrát zacyklí, pokračuje v skripte.
Tu je ďalšia funkcia:
Funkcia ShutdownComputer objWshShl. Run "Shutdown /s /f /t 0", 0 End Function
Všetko, čo urobí, je vypnutie počítača pomocou príkazu run. Tu sú použité prepínače: /s /f /t. /S znamená vypnutie, /f znamená zatvorenie všetkých aplikácií bez varovania, /t je čas v sekundách pred vypnutím. Všimnite si, že po tomto príkaze je čiarka nula ", 0". Vďaka tomu už pri vykonávaní príkazu vypnutia nebliká žiadna vdova cmd.
Krok 3: Dúfam, že to bolo užitočné
Dúfam, že tento návod bol nápomocný, ak potrebujete ďalšiu pomoc alebo máte otázky, napíšte mi alebo zanechajte komentár.
Odporúča:
The Ultimate Knife Block: 11 Steps (with Pictures)
The Ultimate Knife Block: Všetci sme tam boli, sekanie zeleniny nožom tak tupým, že by bolo efektívnejšie použiť čajovú lyžičku. V tom okamihu premýšľate o tom, ako ste sa tam dostali: vaše nože boli pri ich kúpe ostré ako žiletky, ale teraz, o tri roky neskôr,
The Ultimate Beer Pong Machine - PongMate CyberCannon Mark III: 6 Steps (with Pictures)
The Ultimate Beer Pong Machine - PongMate CyberCannon Mark III: IntroductionPongMate CyberCannon Mark III je najnovšia a najpokročilejšia technológia pivného pongu, ktorá sa kedy predáva verejnosti. S novým CyberCannon sa každá osoba môže stať najobávanejším hráčom pri stole pri pivnom pongu. Ako je tento p
Desktop Prank (pre Windows): 5 krokov
Desktop Prank (pre Windows): Je to fantastický žart, ktorého nastavenie trvá iba niekoľko minút. Zdá sa, že počítač vašich obetí bol zmrazený na ploche. Bez ohľadu na to, koľkokrát sa pokúsia kliknúť na ikonu, nič sa nestane
Ultimate Guide to Building Your Multirotor Frames Cheap: 7 Steps
Ultimate Guide to building your Multirotor Frames Cheap: Hey there guys! Dlho sme nevideli. Tak tu je, ako to chodí, nakupoval som na eBay diely, keď vidím všetky tieto dosť slabé a chromé kvadrotorové trikoptéry hexa a octa, ako aj rámy y6 a y4, pohybujúce sa kdekoľvek od 800 do 6 500 rs. Myslel som na stavbu
The Ultimate PVC Quadcopter: 16 Steps (with Pictures)
Ultimátna kvadrokoptéra z PVC: Či už ste začiatočník, ktorý hľadá kvadrokoptéru, ktorá vám pomôže zmoknúť nohami v škrabancoch, alebo ste o niečo skúsenejší a hľadáte lacný a spoľahlivý rám, nehľadajte nič iné ako Špičková kvadrokoptéra z PVC! Toto ja