اسکریپ های vbs به صورت کد هایی تعریف می شود که کاربر های متفاوتی دارند اقلب با فعال شدن این کد ها فکر می کنند ویروس هستند
که قابلیت خراب کاری و پخش شدن ندارند فقط برای ترساندن دوستان یا آشنایان به درد می خورد : )

با استفاده از برنامه Notepadویندوز کمی اسکریپت نویسی می کنیم و سعی می کنیم فایل هایی بسازیم که وقتی دوستان ما روی آن ها کلیک کردند کمی ترس را به چهره آن ها هدیه بدهیم. لازم به ذکر است هیچ کدام از این کدها نمی تواند صدمه ای به سیستم فرد مقابل بزنند و فقط برای این است که کمی با اسکریپت نویسی برای میزبان اسکریپت ویندوز ( WSH) آشنا شویم.

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

با کلیک کردن و اجرای این نوع فایل ها به صورت اتوماتیک میزبان اسکریپت ویندوز که فایل wscript.exe است کدهای داخل این فایل ها را اجرا می کند.

کافی است هر کدام از کدهای زیر را که می خواهید در نرم افزار Notepad کپی کنید با استفاده از کلید ctrl+c و با نام دلخواه abc.vbs ذخیره کنید.

۱-خاموش و روشن کردن پشت سر هم Caps Lockاین کد هر یک ثانیه دکمه Caps Lock شما را می زند و خاموش و روشن می کند:

Set wshShell =wscript.CreateObject(“WScript.Shell”)

do

wscript.sleep 1000

wshshell.sendkeys “{CAPSLOCK}”

loop

۲-خاموش کردن کامپیوتر در تایم مورد نظر

کد زیر را اجرا کنید و مانند تصاویر زیر کامل کنید:

Dim x
Dim yset oShell = createobject(“wscript.shell”)
Set Sapi = Wscript.CreateObject(“SAPI.SpVoice”) x = InputBox(“Would you like to shutdown your PC after a preiod of time? answer: yes/no”,”AUTOMATIC SYSTEM SHUTDOWN! by SCRIPTmaster”)if x = “yes” then
y = InputBox(“Enter time left for shutdown to occur automatically(time in minutes…):”,”AUTOMATIC SYSTEM SHUTDOWN!”)
sapi.speak y + “minutes left for shutdown”
oShell.Run “shutdown.exe -s -t ” & (y * 60) & ” -f -c “”System is now set for automatic shutdown! do not wait for the downloads to finish, you can go to sleep! GOOD NIGHT! see u 2morow! >>>>to terminate this Automatic shutdown just rerun the script and type no”””end if
if x = “no” then
sapi.speak “okay, as you wish good bye, script writen by Ayman Farhat the SCRIPTmaster”
oShell.run “shutdown.exe -a”

end if
کلمه yes را در کادر باز شده وارد کنید
FZ15KGOFITUPP40_LARGE
در پنجره بعدی تایم مورد نظر خودتون رو وارد کنید به صورت دقیقه
FKOORHMFITUPP42_LARGE
تمام : )

 

EMAD CeZaR

دیدگاهتان را بنویسید

نشانی ایمیل شما منتشر نخواهد شد. بخش‌های موردنیاز علامت‌گذاری شده‌اند *