شوخی نهایی خاموش شدن کامپیوتر: 3 مرحله

2024 نویسنده: John Day | [email protected]. آخرین اصلاح شده: 2024-01-30 08:52

این یک اسکریپت خاموش کردن.vbs است که من به عنوان یک شوخی ساخته ام. دلیل خنک بودن آن این است که به جای خاموش کردن سریع کامپیوتر ، رایانه با شما صحبت می کند و به شما هشدار می دهد که کامپیوتر در 10 ثانیه خاموش می شود ، سپس یک انیمیشن کوچک را در حال شمارش 5 ثانیه گذشته قبل نشان می دهد. کامپیوتر را خاموش می کند

من همچنین دوست دارم آن را در یک.exe با استفاده از مبدل کامپایل کنم ، اما لازم نیست این کار را انجام دهید. اگر می خواهید بدانید چگونه این کار را انجام دهید ، قفل صفحه vbs من را مشاهده کنید. همچنین پیوندهایی برای ویرایشگران vbs نیز در این دستورالعمل وجود دارد.

اما برخلاف قفل صفحه من ، این برنامه بسیار کوتاه تر است ، بنابراین سعی می کنم آن را به بهترین نحو توضیح دهم.

توجه: اگر از قبل vbs را نمی شناسید ، توصیه می کنم این دستورالعمل را بررسی کنید تا بتوانید از برخی از عملکردهای مورد استفاده در این اسکریپت مطلع شوید.

مرحله 1: اسکریپت من…

اینم اسکریپتش..

شما باید یکی از "s" ها را در انتها حذف کنید تا به "Shutdown.vbs" یا هر چیزی که می خواهید مادامی که به.vbs خاتمه می یابد ختم شود.

مرحله 2: اسکریپت من (توضیح)…

بنابراین بدانید من کد را توضیح خواهم داد…

خط اول واقعاً کار چندانی نمی کند ، فقط هنگام خلق فیلمنامه به من کمک کرد. در اینجا سه خط بعدی آمده است:

Dim IntCounterDim objWshShl: تنظیم objWshShl = WScript. CreateObject ("wscript.shell") Dim objVoice: تنظیم objVoice = WScript. CreateObject ("sapi.spvoice")

اولین خط کد متغیری را که برای کنترل از آن استفاده می کنیم For … Next Loop اعلام می کند. دو خط بعدی کد 2 متغیر را اعلام و تنظیم می کند. objWshShl برای جعبه پیام و توابع اجرا استفاده می شود. از objVoice برای "صحبت کردن" کامپیوتر استفاده می شود.

در اینجا سه خط دیگر وجود دارد:

ShutdownWarning () TimedMessageBox () ShutdownComputer ()

این خطوط فقط سه تابع موجود در اسکریپت ما را فراخوانی می کنند.

در اینجا اولین تابع in are script است.

Function ShutdownWarning objVoice. Speak "این رایانه اکنون در 10 ثانیه خاموش می شود." WScript. Sleep 5000 تابع پایان

ما واقعاً به توابع در اسکریپت خود نیاز نداریم ، اما فقط به نظم بخشیدن به چیزها کمک می کند.

بنابراین همه اینها این است که جمله را بین نقل قول ها بیان کنید و سپس 5 ثانیه مکث کنید تا به عملکرد بعدی ادامه دهید.

این قسمت بعدی ممکن است کمی پیچیده به نظر برسد ، اما درک آن بسیار آسان است:

تابع TimedMessageBox For IntCounter = 5 تا 1 مرحله -1 objWshShl. Popup "Computer will shutdown in" _ & IntCounter & "seconds"، 1، "Computer Shutdown" ، 0+48 Next End Function

بنابراین ابتدا تابعی به نام TimedMessageBox ایجاد می کند.

سپس 4 خط بعدی یک حلقه For … Next است. بنابراین این حلقه پنج بار حلقه خواهد شد و هر بار یک بار پایین می آید.

objWshShl. Popup "کامپیوتر در" _ & IntCounter & "seconds" خاموش می شود ، 1 ، "خاموش شدن کامپیوتر" ، 0+48

این کد در واقع تنها یک خط کد است ، فقط با استفاده از کاراکتر "_" در یک خط دیگر جدا شده است تا خواندن آن آسان تر شود. کاری که این کد انجام می دهد این است که یک پیام بازشو ایجاد می کند که به مدت 1 ثانیه طول می کشد تا ثانیه باقی مانده تا خاموش شدن با استفاده از متغیر IntCounter نمایش داده شود.

هنگامی که این حلقه پنج بار حلقه می شود ، با اسکریپت ادامه می یابد.

در اینجا تابع بعدی است:

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

همه اینها خاموش کردن کامپیوتر با استفاده از دستور run است. در اینجا سوئیچ های مورد استفاده است: /s /f /t. the /s به معنای خاموش شدن ، /f به معنی بستن همه برنامه ها بدون هشدار است ، /t زمان به ثانیه قبل از خاموش شدن است. بعد از آن دستور متوجه خواهید شد که کاما صفر "، 0" وجود دارد. این فقط باعث می شود وقتی فرمان خاموش شدن اجرا می شود هیچ cmd widow چشمک نزند.

مرحله 3: امیدوارم این مفید بوده باشد

امیدوارم اگر به راهنمایی بیشتری احتیاج داشتید یا س questionsالی داشتید ، این دستورالعمل مفید بود ، لطفاً به من پیام دهید یا نظر بدهید.