CD Virus

Introduction: CD Virus

About: Mainly a Tech Blogger

.

Step 1: Open Notepad

After opening notepad type the following


Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection

if colCDROMs.Count = 1 then

for i = 0 to colCDROMS.Count - 1

colCDROMs.Item(i).Eject

colCDROMs.Item(i).Eject

Next ' cdrom

End if


Step 2: Saving the File.

Now WHILE SAVING

name.vbs

and

OPEN IT

Coded Creations

Participated in the
Coded Creations

Be the First to Share

    Recommendations

    • 3D Printed Student Design Challenge

      3D Printed Student Design Challenge
    • Rocks, Gems, and Stones Speed Challenge

      Rocks, Gems, and Stones Speed Challenge
    • Tinkercad Student Design Contest

      Tinkercad Student Design Contest

    5 Comments

    0
    BatchBum
    BatchBum

    5 years ago

    Every body knows how to do that

    0
    JoeSalmi
    JoeSalmi

    6 years ago on Introduction

    As soon as I saved it, it triggers my AVG virus detection.