Prankja përfundimtare e mbylljes së kompjuterit: 3 hapa

2024 Autor: John Day | [email protected]. E modifikuara e fundit: 2024-01-30 12:10

Ky është një skenar mbylljeje.vbs që e kam bërë si shaka. Arsyeja pse është kaq e ftohtë, është sepse në vend që të fikni kompjuterin menjëherë, kompjuteri ju flet, duke ju paralajmëruar se kompjuteri do të fiket në 10 sekonda, pastaj shfaq një animacion të vogël që numëron 5 sekondat e fundit para e fik kompjuterin.

Më pëlqen gjithashtu ta përpiloj atë në një.exe duke përdorur një konvertues, por nuk keni pse ta bëni këtë. Shikoni VBS Screen Lock, nëse dëshironi të dini si ta bëni këtë. Ekzistojnë gjithashtu disa lidhje për redaktuesit e vbs, gjithashtu në atë udhëzues.

Por ndryshe nga kyçi im i ekranit, ky program është shumë më i shkurtër, kështu që do të përpiqem ta shpjegoj sa më mirë që mundem.

SH NOTNIM: Nëse nuk e dini tashmë vbs, ju rekomandoj të kontrolloni këtë Instructable në mënyrë që të keni një kuptim themelor të disa prej funksioneve të përdorura është ky shkrim.

Hapi 1: Skenari im…

Këtu është skenari..

Ju do të duhet të fshini një nga "s" në fund në mënyrë që të përfundojë në "Shutdown.vbs" ose çfarëdo që dëshironi për sa kohë që përfundon në.vbs.

Hapi 2: Skenari im (shpjegim)…

Pra, e di që unë do të shpjegoj kodin …

Linja e parë nuk bën shumë, thjesht më ndihmoi kur po krijoja skenarin. Këtu janë tre rreshtat e mëposhtëm:

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

Linja e parë e kodit deklaron ndryshoren që do të përdorim për të kontrolluar janë For … Next Loop. Dy rreshtat e ardhshëm të kodit deklarojnë dhe vendosin 2 ndryshore. objWshShl përdoret për kutinë e mesazheve dhe funksionet e ekzekutimit. objVoice përdoret për ta bërë kompjuterin të "flasë".

Këtu janë tre rreshta të tjerë:

ShutdownWarning () TimedMessageBox () ShutdownComputer ()

Këto rreshta po thërrasin vetëm tre funksionet që janë në shkrimin tonë.

Këtu është funksioni i parë në script.

Funksioni ShutdownWarning objVoice. Speak "Ky kompjuter tani do të fiket në 10 sekonda." WScript. Sleep 5000 Fund Funksioni

Ne nuk kemi vërtet nevojë për funksione në shkrimin tonë, por thjesht na ndihmon t'i mbajmë gjërat të organizuara.

Pra, e gjithë kjo bën është të flasësh fjalinë midis thonjëzave dhe më pas të pushosh për 5 sekonda para se të vazhdosh me funksionin tjetër.

Kjo pjesë tjetër mund të duket disi e ndërlikuar, por në fakt është mjaft e lehtë për tu kuptuar:

Funksioni TimedMessageBox For IntCounter = 5 Deri në 1 Hapi -1 objWshShl. Popup "Kompjuteri do të fiket në" _ & IntCounter & "seconds", 1, "Computer Shutdown", 0+48 Funksioni i Fundit tjetër

Pra, së pari krijon një funksion të quajtur TimedMessageBox.

Pastaj 4 rreshtat e ardhshëm janë një For … Next Loop. Pra, ky lak do të lakohet pesë herë duke zbritur nga një çdo herë.

objWshShl. Popup "Kompjuteri do të fiket në" _ & IntCounter & "seconds", 1, "Computer Shutdown", 0+48

Ky kod është në të vërtetë vetëm një rresht kodi, thjesht ndahet në një rresht tjetër duke përdorur karakterin "_" për ta bërë më të lehtë leximin. Ajo që bën ky kod është krijimi i një mesazhi që shfaqet për 1 sekondë dhe tregon sasinë e sekondave të mbetura deri në mbyllje duke përdorur ndryshoren IntCounter.

Sapo ky lak të dalë pesë herë, ai vazhdon me skenarin.

Këtu është funksioni tjetër:

Funksioni ShutdownComputer objWshShl. Run "Shutdown /s /f /t 0", 0 Funksioni Fundor

E gjithë kjo është mbyllja e kompjuterit duke përdorur një komandë ekzekutimi. Këtu janë çelsat e përdorur: /s /f /t. The /s do të thotë mbyllje, /f do të thotë të mbyllësh të gjitha aplikacionet pa paralajmërim, /t është koha në sekonda para mbylljes. Pas asaj komande do të vini re se ekziston një presje zero ", 0". Kjo thjesht e bën atë që asnjë vejushë cmd të mos pulsojë kur ekzekutohet komanda e mbylljes.

Hapi 3: Shpresoj se kjo ishte e dobishme

Shpresoj se ky Instructable ishte i dobishëm nëse keni nevojë për më shumë ndihmë ose keni ndonjë pyetje, ju lutem më shkruani ose lini një koment.