Kompyuterni o'chirishning yakuniy pranki: 3 qadam

2024 Muallif: John Day | [email protected]. Oxirgi o'zgartirilgan: 2024-01-30 13:23

Bu men hazil sifatida qilgan.vbs o'chirish skriptidir. Bu juda zo'r ekanining sababi shundaki, kompyuterni darhol o'chirib qo'yish o'rniga, kompyuter siz bilan gaplashadi va sizni kompyuter 10 soniyada o'chib ketishi haqida ogohlantiradi, so'ngra oxirgi 5 soniyani sanab o'tadigan kichik animatsiyani ko'rsatadi. u kompyuterni o'chirib qo'yadi.

Men ham uni konvertor yordamida.exe ga kompilyatsiya qilishni yaxshi ko'raman, lekin buni qilish shart emas. Agar buni qanday qilishni bilmoqchi bo'lsangiz, vbs Screen Lock -ni ko'ring. Vbs tahrirlovchilari uchun havolalar ham bor.

Ammo mening ekran qulfimdan farqli o'laroq, bu dastur ancha qisqa, shuning uchun men uni eng yaxshi tushuntirishga harakat qilaman.

QAYD: Agar siz vbs -ni bilmasangiz, men ushbu ko'rsatmalarni tekshirishni maslahat beraman, shunda siz ba'zi funktsiyalar haqida asosiy tushunchaga ega bo'lasiz - bu skript.

1 -qadam: Mening skriptim …

Mana skript..

Oxirida "s" dan birini o'chirish kerak bo'ladi, shunda u "Shutdown.vbs" bilan tugaydi yoki.vbs bilan tugaguncha xohlagan narsangiz bo'ladi.

2 -qadam: Mening skriptim (tushuntirish) …

Bilingki, men kodni tushuntiraman …

Birinchi satr juda ko'p narsani qilmaydi, faqat skriptni yaratishda menga yordam berdi. Mana keyingi uchta qator:

Dim IntCounterDim objWshShl: ObjWshShl = WScript. CreateObject ("wscript.shell") o'rnating Dim objVoice: ObjVoice = WScript. CreateObject -ni o'rnating ("sapi.spvoice")

Kodning birinchi qatori biz boshqaradigan o'zgaruvchini quyidagilar uchun e'lon qiladi … Keyingi ko'chadan. Keyingi ikkita kod satri 2 o'zgaruvchini e'lon qiladi va o'rnatadi. objWshShl xabarlar qutisi va ishga tushirish funktsiyalari uchun ishlatiladi. objVoice kompyuterni "gapirish" uchun ishlatiladi.

Mana yana uchta qator:

ShutdownWarning () TimedMessageBox () ShutdownComputer ()

Bu satrlar bizning skriptimizdagi uchta funktsiyani chaqiradi.

Bu erda skriptdagi birinchi funktsiya.

O'chirish funktsiyasi objVoice. Speak "Bu kompyuter endi 10 soniyada o'chadi." WScript. Sleep 5000 tugatish funktsiyasi

Bizga skriptda funktsiyalar kerak emas, lekin bu faqat tartibni saqlashga yordam beradi.

Shunday qilib, bularning barchasi jumlani tirnoq orasida gapirish va keyin keyingi funktsiyaga o'tishdan oldin 5 soniya pauza qilishdir.

Bu keyingi qism biroz murakkab bo'lib tuyulishi mumkin, lekin uni tushunish juda oson:

IntCounter = 5 dan 1 qadamgacha TimedMessageBox funktsiyasi -1 objWshShl. Popup "Kompyuter" _ & IntCounter & "soniyalarda", 1, "Kompyuterni o'chirish", 0+48 Keyingi Oxirgi Funktsiya.

Shunday qilib, avval u TimedMessageBox deb nomlangan funktsiyani yaratadi.

Keyin keyingi 4 satr - For… Next Loop. Shunday qilib, bu pastadir har safar besh marta pastlab ketadi.

objWshShl. Popup "Kompyuter" _ & IntCounter & "soniyalarda", 1, "Kompyuterni o'chirish", 0+48 da o'chadi.

Bu kod aslida bitta kod satridir, u o'qishni osonlashtirish uchun "_" belgisidan foydalanib boshqa qatorga ajratilgan. Bu kod nima qiladi, u 1 soniya davom etadigan qalqib chiquvchi xabarni yaratadi, IntCounter o'zgaruvchisi yordamida o'chirilgunga qadar qolgan soniyalar sonini ko'rsatadi.

Bu tsikl besh marta aylansa, u skriptda davom etadi.

Mana keyingi funksiya:

ShutdownComputer objWshShl. Run "O'chirish /s /f /t 0", 0 tugatish funktsiyasi

Bularning barchasi, ishga tushirish buyrug'i yordamida kompyuterni o'chirishdir. Bu erda ishlatiladigan kalitlar: /s /f /t. /S - o'chirishni bildiradi, /f - barcha ilovalarni ogohlantirmasdan yopishni anglatadi, Siz buyruqdan keyin nol ", 0" vergulini ko'rasiz. Bu shuni ko'rsatadiki, o'chirish buyrug'i bajarilganda, hech qanday beva beva ayol yonmaydi.

3 -qadam: Umid qilamanki, bu foydali bo'ldi

Umid qilamanki, bu ko'rsatma sizga yordam kerak bo'lsa yoki savollaringiz bo'lsa, menga yozing yoki sharh qoldiring.