cara menjaili komputer dengan Notepad
Dinginnya suasana malam tak henti saya ingin Posting lagi, jadi ketagihan ni share sama sahabat Jail.. sebelum saya memulai "Jail dengan Notepad" saya ingin tanya pada sahabat Jail, sahabat Jail tau kan Notepad?? kalo ga tau sungguh kebangetan.. hehehe
iya sahabat Jail Notepad aplikasi bawaan dari window untuk menulis catatan, hanya itu?? sebaiknya sahabat Jail jangan meremehkan si Notepad ini dehhh. kenapa ?? karena Notepad banyak kegunaanya seperti : membuat Pesan, membuat Virus,
ok langsung saja ke TKP
langkah demi langkah saya akan jelaskan, berikut langkahnya:
terus ketikkan/copy di notepad yang berada di gambar, berikut tips Jail dengan Notepad
@echo off
msg * makanya jangan pelit lu
shutdown -s -c "Error! Kena batunya lu"
1. Memunculkan Pesan Sebelum Windows mati
Code:@echo off
msg * makanya jangan pelit lu
shutdown -s -c "Error! Kena batunya lu"
Note :
save file dengan nama bluee mail.BAT
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 50
wshshell.sendkeys "{CAPSLOCK}"
loop
2. Memainkan Lampu Caps Lock seperti Lampu Disko
Code:Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 50
wshshell.sendkeys "{CAPSLOCK}"
loop
Note :
save file dengan nama Capslock.vbs
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
3. buka tutup CD/DVD
Code: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
Note :save file dengan nama buka tutup.vbs
MsgBox "Kasihan Deh lu"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
4. teken tombol backspace terus-menerus
Code:MsgBox "Kasihan Deh lu"
Set wshShell =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "{bs}"
loop
Note :save nama file dengan: Backspace.vbs
START %SystemRoot%\system32\Notepad.exe
GOTO top
@ECHO off
:Begin
msg * kalo kamu
msg * Mau Menutup
msg * Pesan Ini
msg * Lebih Baik Kamu
msg * Install Ulang saja
GOTO BEGIN
5. Buka program Terus menerus
@ECHO off
:topSTART %SystemRoot%\system32\Notepad.exe
GOTO top
Note:
save nama file dengan: hahaha.bat
6. Pesan yang terus muncul tanpa berhenti
Code:@ECHO off
:Begin
msg * kalo kamu
msg * Mau Menutup
msg * Pesan Ini
msg * Lebih Baik Kamu
msg * Install Ulang saja
GOTO BEGIN
Note :
Save File dengan nama : bluee mail.bat
7. Membuka otomatis Notepad dan mengetikan kata kata sendiri
Code :
wScript.sleep 1800
WScript.Sleep 100
Set wshShell = wScript.Createobject("Wscript.Shell")
wshShell.Run "Notepad"
wScript.sleep 50
wShShell.AppActivate "Notepad"
wScript.sleep 100
wSHshell.sendKeys "A"
wScript.sleep 100
wShShell.sendKeys "K"
wscript.sleep 100
wsHshell.sendKeys "U"
wscript.sleep 100
wsHshell.sendKeys " "
wscript.sleep 100
wsHshell.sendKeys "S"
wscript.sleep 100
wsHshell.sendKeys "A"
wscript.sleep 100
wsHshell.sendKeys "Y"
wscript.sleep 100
wsHshell.sendKeys "A"
wscript.sleep 100
wsHshell.sendKeys "N"
wscript.sleep 100
wsHshell.sendKeys "G"
wscript.sleep 100
wsHshell.sendKeys " "
wscript.sleep 100
wsHshell.sendKeys "K"
wscript.sleep 100
wsHshell.sendKeys "A"
wscript.sleep 100
wsHshell.sendKeys "M"
wscript.sleep 100
wsHshell.sendKeys "U"
wscript.sleep 100
wsHshell.sendKeys ","
wscript.sleep 100
wsHshell.sendKeys " "
wscript.sleep 100
wsHshell.sendKeys "M"
wscript.sleep 100
wsHshell.sendKeys "A"
wscript.sleep 100
wsHshell.sendKeys "U"
wscript.sleep 100
wsHshell.sendKeys "K"
wscript.sleep 100
wsHshell.sendKeys "A"
wscript.sleep 100
wsHshell.sendKeys "H"
wscript.sleep 100
wsHshell.sendKeys " "
wscript.sleep 100
wsHshell.sendKeys "K"
wscript.sleep 100
wsHshell.sendKeys "A"
wscript.sleep 100
wsHshell.sendKeys "M"
wscript.sleep 100
wsHshell.sendKeys "U"
wsHshell.sendKeys " "
wscript.sleep 100
wsHshell.sendKeys "K"
wscript.sleep 100
wsHshell.sendKeys "E"
wscript.sleep 100
wsHshell.sendKeys "M"
wscript.sleep 100
wsHshell.sendKeys "B"
wscript.sleep 100
wsHshell.sendKeys "A"
wscript.sleep 100
wsHshell.sendKeys "L"
wscript.sleep 100
wsHshell.sendKeys "I"
wscript.sleep 100
wsHshell.sendKeys " "
wscript.sleep 100
wsHshell.sendKeys "P"
wscript.sleep 100
wsHshell.sendKeys "A"
wscript.sleep 100
wsHshell.sendKeys "D"
wscript.sleep 100
wsHshell.sendKeys "A"
wscript.sleep 100
wsHshell.sendKeys "K"
wscript.sleep 100
wsHshell.sendKeys "U"
WshShell.SendKeys "!! "
Note :
save File dengan nama bluee mail.vbs
hahahaha, bagaimana sahabat Jail?? serukan, massih banyak yang belum saya Posting tentang Notepad. mungkin lain kali saja saya lanjutkan. ok.
wasssalam
salam blognoler,kunjungan balik sob.kalau Sobat berkeinginan tukar link .silahkan pasang dulu link saya sob, nanti baru saya pasang link sobat di Blognoler..trims
ReplyDelete