ساخت ویروسهای بی خطر کامپیوتری | اسکریپت های vbs به صورت کدهایی تعریف می شود که کاربرد های متفاوتی دارند ، اغلب با فعال شدن این کد ها فکر می کنند ویروس هستند اما این نوع اسکریپت ها قابلیت خراب کاری و پخش شدن ندارند فقط برای ترساندن دوستان یا آشنایان به درد می خورد : )
با استفاده از برنامه Notepad ویندوز کمی اسکریپت نویسی می کنیم و سعی می کنیم فایل هایی بسازیم که وقتی دوستان ما روی آن ها کلیک کردند کمی ترس را به چهره آن ها هدیه بدهیم. لازم به ذکر است هیچ کدام از این کدها نمی تواند صدمه ای به سیستم فرد مقابل بزنند و فقط برای این است که کمی با اسکریپت نویسی برای میزبان اسکریپت ویندوز ( WSH) آشنا شویم .
اسم این مطلب به نوعی دیگر میتوان ویروس نویسی گذاشت ، ولی این اسکریپت ها هیچ گونه آسیبی به سیستم نمیزنند و قابلیت انشار ندارند و فقط و فقط جهت شوخی و آشنایی با استفاده هایه اسکریپت نویسی میباشد
البته نیازی به استفاده از نرم افزار Notepad به طور اختصاصی وجود ندارد و می توانید با هر نرم افزار ویرایشگر متن ساده دیگری اسکریپ نویسی کنید
برای میزبان اسکریپت ویندوز فقط کافی است در انتها کد های خود را با پسوند vbs ذخیره کنید
با کلیک کردن و اجرای این نوع فایل ها به صورت اتوماتیک میزبان اسکریپت ویندوز که فایل wscript.exe است کدهای داخل این فایل ها را اجرا می کند.
1-خاموش و روشن کردن پشت سر هم Caps Lockاین کد هر یک ثانیه دکمه Caps Lock شما را می زند و خاموش و روشن می کند:
Set wshShell =wscript.CreateObject(“WScript.Shell”)
do
wscript.sleep 1000
wshshell.sendkeys “{CAPSLOCK}”
loop
2-خاموش کردن کامپیوتر در تایم مورد نظر
کد زیر را اجرا کنید و مانند تصاویر زیر کامل کنید:
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 را در کادر باز شده وارد کنید
در پنجره بعدی تایم مورد نظر خودتون رو وارد کنید به صورت دقیقه
تمام : )