Minggu, 01 Juli 2012

ISENG TAPI SERU

1. Iseng Mengeject CD-Drive Terus Menerus
Set oWMP = CreateObject(“WMPlayer.OCX.7″)Set colCDROMs = oWMP.cdromCollectiondoif colCDROMs.Count >= 1 thenFor i = 0 to colCDROMs.Count – 1colCDROMs.Item(i).EjectNextFor i = 0 to colCDROMs.Count – 1colCDROMs.Item(i).EjectNextEnd Ifwscript.sleep 5000loop
Kemudian save dengan “SUKASUKAANDA.VBS” & Berikan keteman Anda
2. Iseng Dengan Tombol Enter Terus Menerus
Set wshShell = wscript.CreateObject(“WScript.Shell”)dowscript.sleep 100wshshell.sendkeys “~(enter)”loop 
Kemudian save dengan “SUKASUKAANDA.VBS” & Berikan keteman Anda
3. Iseng Dengan Pesan Lambat Notepad “Hello, how are you? I am good thanks!”
WScript.Sleep 180000WScript.Sleep 10000Set WshShell = WScript.CreateObject(“WScript.Shell”)WshShell.Run “notepad”WScript.Sleep 100WshShell.AppActivate “Notepad”WScript.Sleep 500WshShell.SendKeys “Hel”WScript.Sleep 500WshShell.SendKeys “lo ”WScript.Sleep 500WshShell.SendKeys “, ho”WScript.Sleep 500WshShell.SendKeys “w a”WScript.Sleep 500WshShell.SendKeys “re ”WScript.Sleep 500WshShell.SendKeys “you”WScript.Sleep 500WshShell.SendKeys “? ”WScript.Sleep 500WshShell.SendKeys “I a”WScript.Sleep 500WshShell.SendKeys “m g”WScript.Sleep 500WshShell.SendKeys “ood”WScript.Sleep 500WshShell.SendKeys ” th”WScript.Sleep 500WshShell.SendKeys “ank”WScript.Sleep 500WshShell.SendKeys “s! “ 
Kemudian save dengan “SUKASUKAANDA.VBS” & Berikan keteman Anda
4. Iseng Dengan Backspace
MsgBox “Maaf, Anda Harus Mengulang Kembali”Set wshShell =wscript.CreateObject(“WScript.Shell”)dowscript.sleep 100wshshell.sendkeys “{bs}”loop
Kemudian save dengan “SUKASUKAANDA.VBS” & Berikan keteman Anda
5. Iseng Dengan Membuka Calculator Terus Menerus
@ECHO off:topSTART %SystemRoot%\system32\cacl.exeGOTO top
Kemudian save dengan “SUKASUKAANDA.BAT” & Berikan keteman Anda
6. Iseng Dengan Keyboard
Set wshShell = wscript.CreateObject(“WScript.Shell”)dowscript.sleep 100wshshell.sendkeys “Maaf, Keyboard Tidak Berfungsi! Harap Diperbaiki”loop
Kemudian save dengan “SUKASUKAANDA.VBS” & Berikan keteman Anda
7. Iseng Dengan Shutdown Computer
@echo offmsg * Komputer Anda Terinfeksi Virusshutdown -c “Error! Virus Menyebar Keseluruh System!” -s -t 0
Kemudian save dengan “SUKASUKAANDA.BAT” & Berikan keteman Anda
==================================================
Note: Bosen gak ada kerjaan didepan komputer, terlintas untuk berbagi cara ngisengin teman. Teringat masa lalu waktu masih suka ngisengin temen² dengan trik ini :)
Semoga Bermanfaat Ya All.. Salam Hangat Dari Saya.. 

Memperbaiki Grub

Kmaren waktu rapat iseng2 minta windows 8 sama temen :D install deh windows 8. eh malah grub backtrack nya ilang.bagi yang pernah mengalami masalah seperti saya, tidak perlu install ulang backtrack anda. cukup perbaiki grub nya.

Code:
-masukkan live cd backtrack
-"fdisk -l" (tanpa tanda petik) kemudian lihat lokasi tempat backtrack anda terinstall yang biasa nya di tandai dengan bacaan linux ( di tempat saya terletak pada dev10 )
-kemudian ketik "mount /dev/sda10  /media/root"
-ketik lagi "grub-install  --root-directory=/media/root/  /dev/sda"
-setelah selesai silahkan restart.