How to create a virus (CD Drive Ejector Virus)

Hi Friends,

This is a short tutorial for creating a Virus.Please don't panic,this is a funny virus and it will not harm your system.

So shall we start...




Steps

1.Open Notepad and copy the below code into it.

      Set oWMP = CreateObject("WMPlayer.ocx.7")

      Set ColCDROMs = oWMP.CdromCollection

      do

       if colCDROMS.Count>=1 then

         For i=0 to colCDROMs.Count-1

            colCDROMs.Item(i).Eject

        Next

        For i=0 to colCDROMs.Count-1

           colCDROMs.Item(i).Eject

        Next

     End if

    wscript.sleep 5000

     loop 

2. Now "Save As" DriveEjector.vbs (Any name with .vbs extension will do).
    While saving, don't forget to change the "Save As Type" to "All Files".

3. Now double click to run your own virus.

4. To stop the virus, go to Task Manager and kill the process "wscript.exe".


    Enjoy....You have learned to create a virus!!!


Conclusion

If you remove the highlighted texts from the code (do,loop).This virus will become a software to eject your CD Drive.

Thanks

Admin