Sisukord:

Ülim arvuti väljalülitamise jant: 3 sammu
Ülim arvuti väljalülitamise jant: 3 sammu

Video: Ülim arvuti väljalülitamise jant: 3 sammu

Video: Ülim arvuti väljalülitamise jant: 3 sammu
Video: FIFA FOOTBALL GIBLETS KICKER 2024, Juuli
Anonim
Ülim arvuti väljalülitamise jant
Ülim arvuti väljalülitamise jant

See on.vbs -i väljalülitamise skript, mille tegin naljana. Põhjus, miks see on nii lahe, on see, et selle asemel, et arvuti lihtsalt välja lülitada, räägib arvuti teiega, hoiatades teid, et arvuti lülitub välja 10 sekundi pärast, seejärel kuvatakse väike animatsioon, mis loeb tagasi viimase 5 sekundi see lülitas arvuti välja.

Mulle meeldib ka selle konverteerimine.exe -ks kompileerida, kuid te ei pea seda tegema. Vaadake minu vbs -i ekraanilukku, kui soovite teada, kuidas seda teha. Selles juhendis on ka mõned lingid vbs -i toimetajatele.

Kuid erinevalt minu ekraanilukust on see programm palju lühem, nii et püüan seda võimalikult hästi selgitada.

MÄRKUS. Kui te veel vbs -i ei tunne, soovitan vaadata seda Instructable'i, et teil oleks selle skripti põhiteadmised mõnest kasutatavast funktsioonist.

Samm: minu skript…

Minu skript…
Minu skript…

Siin on skript..

Peate kustutama ühe "s" lõpus, nii et see lõpeks "Shutdown.vbs" või mis iganes soovite, kui see lõpeb.vbs.

Samm: minu skript (selgitus)…

Nii et teate, ma selgitan koodi …

Esimene rida ei tee tegelikult palju, see aitas mind lihtsalt stsenaariumi loomisel. Siin on järgmised kolm rida:

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

Koodi esimene rida deklareerib muutuja, mida me kontrollimiseks kasutame, For … Next Loop. Järgmised kaks koodirida deklareerivad ja määravad 2 muutujat. ObjWshShl kasutatakse sõnumikasti ja käivitusfunktsioonide jaoks. objVoice'i kasutatakse arvuti "rääkimiseks".

Siin on veel kolm rida:

ShutdownWarning () TimedMessageBox () ShutdownComputer ()

Need read kutsuvad lihtsalt kolme funktsiooni, mis on meie skriptis.

Siin on skripti esimene funktsioon.

Funktsioon ShutdownWarning objVoice. Speak "See arvuti lülitub nüüd välja 10 sekundi pärast." WScript. Sleep 5000 lõppfunktsioon

Me ei vaja tegelikult oma skripti funktsioone, kuid see aitab lihtsalt asju korraldada.

Nii et see kõik on rääkida lause jutumärkide vahel ja seejärel teha paus 5 sekundiks, enne kui jätkate järgmise funktsiooniga.

See järgmine osa võib tunduda üsna keeruline, kuid tegelikult on seda üsna lihtne mõista:

Funktsioon TimedMessageBox IntCounterile = 5 kuni 1 Samm -1 objWshShl. Popup "Arvuti lülitub välja" _ & IntCounter & "sekundite pärast, 1," Arvuti väljalülitamine ", 0+48 Järgmine lõppfunktsioon

Nii et kõigepealt loob see funktsiooni nimega TimedMessageBox.

Seejärel on järgmised 4 rida ette nähtud … Järgmine tsükkel. Nii et see silmus pöörleb viis korda iga kord ühe võrra allapoole.

objWshShl. Popup "Arvuti lülitub välja" _ & IntCounter & "sekundi pärast, 1," Arvuti väljalülitamine ", 0+48

See kood on tegelikult ainult üks koodirida, see on lihtsalt eraldatud teisele reale, kasutades märki "_", et seda oleks lihtsam lugeda. Selle koodiga luuakse hüpikteade, mis kestab 1 sekund ja näitab muutuja IntCounter abil sulgemiseni jäänud sekundeid.

Kui see silmus kordub viis korda, jätkab see skriptiga.

Siin on järgmine funktsioon:

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

Kõik see on arvuti käivitamise käsu abil väljalülitamine. Siin on kasutatud lülitid: /s /f /t. /S tähendab sulgemist, /f tähendab kõigi rakenduste hoiatuseta sulgemist, /t on aeg sekundites enne väljalülitamist. Pärast seda käsku märkate, et koma on null ", 0". See muudab selle nii, et ükski cmd lesk ei vilgu, kui käivitatakse käsk seiskamine.

Samm: loodetavasti oli sellest abi

Loodetavasti oli sellest juhendist abi, kui vajate rohkem abi või teil on küsimusi, kirjutage mulle pm või jätke kommentaar.

Soovitan: