Užprogramuokite savo kompiuterį automatiškai išsijungti, nurodydami, kada norite tai padaryti: 4 veiksmai

2024 Autorius: John Day | [email protected]. Paskutinį kartą keistas: 2024-01-30 10:50

Ei, tai dar viena instrukcija, paimta iš mano kasdienio gyvenimo …

praeitą kartą turėjau į savo kompiuterį atsisiųsti daug programinės įrangos ir aš turėjau leisti jai atsisiųsti per naktį, nenorėjau, kad mano kompiuteris būtų įjungtas visą naktį po to, kai atsisiuntimai buvo baigti, ir tuo pačiu negalėjau pabusti, kad to laukčiau kad užbaigtumėte atsisiuntimą ir jį išjungtumėte! todėl aš sukūriau VBscript, kuris leidžia kompiuteriui automatiškai išjungti interaktyviu būdu! išjunkite pasibaigus atsisiuntimui skirtam laikui, jei greitis gali sumažėti, bet bent jau aš neužmigsiu ir neleisiu savo kompiuterio visą naktį nieko nedaryti! ir kompiuteris šiuo atveju bus interaktyvus su vartotoju, nes aš taip pat pridėjau balso ir pasakojimo! todėl stebėkite mano nurodymus! o jei tau patinka plz komentuok! dėkoju

1 veiksmas: pradėkite rašydami scenarijų …

atidarykite bloknotą ir į užrašų knygelę įrašykite šį scenarijų: Dim xDim yset oShell = createobject ("wscript.shell") Nustatykite Sapi = Wscript. CreateObject ("SAPI. SpVoice") x = InputBox ("Ar norėtumėte išjungti kompiuterį po laiko tarpas? atsakymas: taip/ne "," AUTOMATINĖ SISTEMA IŠJUNGTA! pateikė SCRIPTmaster "), jei x =" taip ", tada y =" InputBox "(" Įveskite likusį laiką, kol išjungimas įvyks automatiškai (laikas minutėmis …): ", "AUTOMATINĖ SISTEMA IŠJUNGTA!") Sapi.speak y + "liko minutės išjungti" oShell. Run "shutdown.exe -s -t" & (y * 60) & "-f -c" "Sistema dabar nustatyta automatiškai Išjunkite! nelaukite, kol atsisiuntimai bus baigti, galite eiti miegoti! LABA NAKTIS! žr. 2 val.! >>>> Norėdami nutraukti šį automatinį išjungimą, tiesiog paleiskite scenarijų iš naujo ir įveskite „“„end“, jei jei x = "ne" "tada sapi.speak" gerai, kaip nori atsisveikinti, scenarijų parašė Ayman Farhat, SCRIPTmaster "oShell.run" shutdown.exe -a "pabaiga

2 žingsnis: Išsamus kodo aprašymas scenarijuje …

Dim x ir Dim y /// skelbia kintamuosius x ir y, atsakingus už atsakymą, ir laiką. Set oShell = createobject ("wscript.shell") /// iškviečia OS apvalkalą ir sukuria objektą wscript.shellSet Sapi = „Wscript. CreateObject“(„SAPI. SpVoice“) /// vadina „Windows“SAPI ir sukuria objektą SAPI. SpVoice, kuris yra atsakingas už kalbą šiame scenarijuje, kai jis pasakoja vartotojui… x = InputBox ("Ar norėtumėte išjungti kompiuteris po tam tikro laiko? šakotasis pareiškimas = InputBox ("Įveskite likusį laiką, kad išjungimas įvyktų automatiškai (laikas minutėmis …):", "AUTOMATINĖ SISTEMA IŠJUNGTA!") // jei vartotojas pasirenka "taip", kitas įvestis paragina jį priskirti likusį laiką išjungimui sapi.speak y + "minutės liko išjungti" /// "Windows SAPI" skaito likusias minutes "oShell. Run" "shutdown.exe -s -t" & (y * 60) & "-f -c" "Sistema dabar nustatytas automatiniam išjungimui! nelaukite, kol atsisiuntimai bus baigti, galite eiti miegoti! LABOS NAKTIES! iki pasimatymo 2 ryto! >>>> Norėdami nutraukti šį automatinį išjungimą, tiesiog paleiskite scenarijų ir įveskite „“„“/// tai yra išjungimo teiginys, kuris paleidžia vykdomąjį sistemos paleidimo failą paleisti ir išjungia kompiuterį pagal nurodytą laiką, kuris šiuo atveju yra kintamasis y! pabaiga, jei // baigia pirmąjį if teiginį, kuris šiuo atveju yra „taip“, jei x = „ne“, tada //. autorius Ayman Farhat SCRIPTmaster "/// SAPI kalba su vartotoju ir sako jam labas, oShell.run" shutdown.exe -a " / /šiuo atveju iškviečiamas shutdown.exe ir jam liepiama nevykdyti pridedant -a! pabaiga, jei // teiginio pabaiga! tai buvo breifas, tačiau išsamus aprašymas, žinokite, eikite į kitą veiksmą ir sužinokite, ką daryti …

3 žingsnis: išsaugokite scenarijų

įvedę scenarijų užrašų knygelėje, turite jį išsaugoti, spustelėkite įrašyti, o toje vietoje, kur įvedate failo pavadinimą, įrašykite failo pavadinimą po.vbs, kaip parodyta paveikslėlyje …

4 veiksmas: paleiskite scenarijų …

dukart spustelėkite ką tik išsaugotą VB programą ir pamatysite magiją!

pirmiausia būsite paraginti įvesties klausimo, kurį norite uždaryti, ar ne, kaip parodyta paveikslėlyje. jei nepasirinksite išjungti rašydami „ne“, programa automatiškai nesibaigs … jei pasirinksite išjungti įvedę „taip“, būsite paraginti kito įvesties, kuriame bus klausiama, kiek minučių norite, kad jūsų kompiuteris liktų įjungtas, kaip parodyta paveikslėlyje žemiau. ir tada prasidės išjungimo atgalinis skaičiavimas, jei norite nutraukti tą išjungimą dėl kokių nors priežasčių, tiesiog paleiskite programą, kol vyksta išjungimas, ir įveskite „no“ir jis baigsis savarankiškai! Taigi tai buvo problemos, nuo kurios kenčia daugelis kompiuterių vartotojų, sprendimas! Tikiuosi, kad jums patiko mano pamokymas, jei norite, palikite komentarą, man bus malonu išgirsti iš jūsų. Sėkmės ir geros nakties!