Jump to content

How to make money from CMS Payments ?

 

Click me for INFO

 

WeLand

Фалшив вирус - Урок

Recommended Posts

Здравейте!

Случайно реших да пусна една тема.. та именно "Как да си направим фалшив вирус".

Нека да започваме :

Направете един текст документ, напишете ето този код:

X=MsgBox("Message Description",0+16,"Title")

"Message Description", представлява текстът, който ще се появи във фалшивият, Ви вирус. Тоест, можете да го промените както си искате, например:

X=MsgBox("Virus has been found on your system. Do you want to remove it?",0+16,"Title")

"Title" представлява заглавието на файла, например:

X=MsgBox("Virus has been found on your system. Do you want to remove it?",0+16,"Warning")

Време е за бутоните и иконата на файла, та именно "0+16". 0, представлява бутоните (В случай OK Button) -  Можете да напишете различни числа (От 0 до 5) преди символа "+".

Ето пример, какви бутони прави всяко едно от числата:

0 = OK Button

1 = OK / Cancel Button

2 = Abort / Retry / Ignore Button

3 = Yes / No / Cancel Button

4 = Yes / No Button

5 = Retry / Cancel Button

X=MsgBox("Virus has been found on your system. Do you want to remove it?",4+16,"Warning")

16 Представлява иконата (В случай Critical Icon) - Можете да замените числото с 32,48,64 след символа "+".

Ето пример, какви икони можете да сложите на вашия фалвиш вирус:

16 = Critical Icon

32 = Help Icon

48 = Warning Icon

64 = Information Icon

X=MsgBox("Virus has been found on your system. Do you want to remove it?",4+48,"Warning")

Можете да създадете още страници на вашия фалшив вирус:

X=MsgBox("Virus has been found in your computer. Do you want to remove it?",4+48,"Warning") 

X=MsgBox("Removing virus.. 80%...",1+64,"Virus removing..")

X=MsgBox("Virus removing failed.. Retry to remove the virus...",5+16,"Virus Removing Failed..")

X=MsgBox("Retrying to remove the virus.. Press OK to continue with removing the virus..",1+64,"Retring to remove the virus..")

X=MsgBox("Virus is in your all files.. It's hard to remove it, but your system will try..",1+48,"Warning")

Вече като сте готови с Вашия фалшив вирус, го запазете под файл .vbs, например info.vbs..

Може да направите фалшивия вирус като пранк:

X=MsgBox("Virus has been found in your computer. Do you want to remove it?",4+48,"Warning") 

X=MsgBox("Removing virus.. 80%...",1+64,"Virus removing..")

X=MsgBox("Virus removing failed.. Retry to remove the virus...",5+16,"Virus Removing Failed..")

X=MsgBox("Retrying to remove the virus.. Press OK to continue with removing the virus..",1+64,"Retring to remove the virus..")

X=MsgBox("Virus is in your all files.. It's hard to remove it, but your system will try..",1+48,"Warning")

X=MsgBox("It's fake virus, don't worry (only prank) :D.",1+16,"Warning")

Или пък някакъв досаден файл от 100 или повече страници..

Надявам се този туториал ако може да се нарече такъв :D, да ви е харесал!

Share this post


Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now

Board Life Status


Board startup date: April 15, 2017 07:56:04
×

CMS-BG

From basic content management to advanced CMS features, CMS-BG provides a complete web CMS system that’s amazingly easy to use.

Advertisments