Ostateczny dowcip wyłączania komputera: 3 kroki

2024 Autor: John Day | [email protected]. Ostatnio zmodyfikowany: 2024-01-30 11:27

To jest skrypt zamykający.vbs, który zrobiłem dla żartu. Powodem, dla którego jest tak fajnie, jest to, że zamiast od razu wyłączyć komputer, komputer mówi do ciebie, ostrzegając, że komputer wyłączy się za 10 sekund, a następnie wyświetla małą animację odliczającą ostatnie 5 sekund przed wyłącza komputer.

Lubię też kompilować go do pliku.exe za pomocą konwertera, ale nie musisz tego robić. Zobacz moją blokadę ekranu vbs, jeśli chcesz wiedzieć, jak to zrobić. W tej instrukcji znajdują się również linki do edytorów vbs.

Ale w przeciwieństwie do mojej blokady ekranu, ten program jest znacznie krótszy, więc postaram się wyjaśnić to najlepiej, jak potrafię.

UWAGA: Jeśli nie znasz jeszcze vbs, polecam zapoznanie się z tym Instruktażem, aby mieć podstawową wiedzę na temat niektórych funkcji używanych w tym skrypcie.

Krok 1: Mój skrypt…

Oto scenariusz…

Będziesz musiał usunąć jedno z „s” na końcu, aby kończyło się na „Shutdown.vbs” lub cokolwiek chcesz, o ile kończy się na.vbs.

Krok 2: Mój skrypt (wyjaśnienie)…

Więc wiedz, że wyjaśnię kod…

Pierwsza linia tak naprawdę nie robi wiele, po prostu pomogła mi podczas tworzenia skryptu. Oto kolejne trzy wiersze:

Dim IntCounterDim objWshShl: Set objWshShl = WScript. CreateObject("wscript.shell") Dim objVoice: Set objVoice = WScript. CreateObject("sapi.spvoice")

Pierwsza linia kodu deklaruje, że zmienne, których będziemy używać do sterowania to For…Next Loop. Następne dwa wiersze kodu deklarują i ustawiają 2 zmienne. objWshShl jest używany dla okna komunikatu i funkcji uruchamiania. objVoice służy do tego, aby komputer "mówił".

Oto kolejne trzy linie:

Ostrzeżenie o wyłączeniu () TimedMessageBox () Zamknij komputer ()

Te wiersze po prostu wywołują trzy funkcje, które są w naszym skrypcie.

Oto pierwsza funkcja w skrypcie are.

Funkcja ShutdownWarning objVoice. Speak "Ten komputer zostanie teraz zamknięty za 10 sekund." Funkcja zakończenia WScript. Sleep 5000

Tak naprawdę nie potrzebujemy funkcji w naszym skrypcie, ale to po prostu pomaga utrzymać porządek.

Więc wszystko, co robi, to wypowiadanie zdania między cudzysłowami, a następnie pauza na 5 sekund przed przejściem do następnej funkcji.

Ta następna część może wydawać się dość trudna, ale w rzeczywistości jest dość łatwa do zrozumienia:

Function TimedMessageBox For IntCounter = 5 To 1 Step -1 objWshShl. Popup "Komputer wyłączy się za " _ & IntCounter & " sekund", 1, "Wyłączenie komputera", 0+48 Next End Function

Więc najpierw tworzy funkcję o nazwie TimedMessageBox.

Następne 4 linie to For…Next Loop. Tak więc ta pętla zapętli się pięć razy, za każdym razem zmniejszając się o jeden.

objWshShl. Popup "Komputer wyłączy się za " _ & IntCounter & " sekund", 1, "Wyłączenie komputera", 0+48

Ten kod jest właściwie tylko jedną linią kodu, jest po prostu oddzielony na inną linię za pomocą znaku "_", aby był łatwiejszy do odczytania. To, co robi ten kod, to tworzenie wyskakującego komunikatu, który trwa 1 sekundę, wyświetlając liczbę sekund pozostałych do zamknięcia przy użyciu zmiennej IntCounter.

Gdy ta pętla zapętli się pięć razy, kontynuuje działanie skryptu.

Oto kolejna funkcja:

Funkcja ShutdownComputer objWshShl. Run "Shutdown /s /f /t 0", 0 Zakończ funkcję

Wszystko, co robi, to wyłączenie komputera za pomocą polecenia uruchamiania. Oto używane przełączniki: /s /f /t. /s oznacza zamknięcie, /f oznacza zamknięcie wszystkich aplikacji bez ostrzeżenia, /t to czas w sekundach przed zamknięciem. Zauważysz, że po tym poleceniu jest przecinek zero ", 0". To po prostu sprawia, że \u200b\u200bżadna wdowa cmd nie miga po wykonaniu polecenia zamknięcia.

Krok 3: Mam nadzieję, że to było pomocne

Mam nadzieję, że ta instrukcja była pomocna, jeśli potrzebujesz dodatkowej pomocy lub masz jakieś pytania, napisz do mnie lub zostaw komentarz.