Show Super Hidden

Nah kelihatan keren kan judul postingan di atas hehehehe… Show Super Hidden, apa maksudnya tuh?!?kamu pasti pernah men setting dokumen/file ke atribut hidden (biar kagak bisa diliat temen2 kamu hohoho), kalo super hidden tuh di atas nya hidden atau kalau di explorer tuh dibaca atribut system.

Sebenarnya banyak lho file-file dengan atribut system yang ada di windows, nah supaya kagak semrawut dan menghindari user mengubah atau menghapus file-file penting tersebut maka Microsoft memberi atribut system. Kalau kita ingin melihat file dengan atribut system maka cara normalnya melalui windows explorer trus folder options dan seterusnya atau lewat registry (hm.. ribet banget kan). Biar nggak ribet kita buat aja aplikasi untuk memunculkan file-file tersebut.

Begini untuk membuat aplikasi ini, pada dasarnya kita mengubah nilai pada registry (biasa dikenal regedit). Jadi kita harus tahu terlebih dahulu alamat superhidden ini, buka registry caranya start -run lalu ketik regedit dan enter

Cari dan lihat pada alamat dibawah ini :

• HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden
• HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden
• HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt

Hm...apa tuh maksudnya alamat registry diatas??kalau di lihat alamat full kayak diatas memang bikin pusing, saran saya ambil bagian belakangnya yakni ShowSuperHidden, Hidden dan HideFileExt.

Maksud dari ketiganya yakni :

1. ShowSuperHidden, ini yang dapat memunculkan file ber atribut system. Pada settingan normal akan bernilai 0 yang artinya file ber atribut system tidak akan kelihatan;
2. Hidden, ini hanya memunculkan file ber atribut hidden saja. Sama seperti ShowSuperHidden, pada settingan normal bernilai 0;
3. HideFileExt, ini merupakan ekstensi dari file-file yang ada di windows explorer, misal : file Microsoft Word sebenarnya berekstensi ***.doc tetapi agar ekstensi ini tidak terlihat maka nilai HideFileExt harus bernilai 1.

Dari penjelasan ketiganya tersebut, maka yang akan kita lakukan yakni mengubah nilai ketiga nya melalui visual basic:

1. ShowSuperHidden, nilai 0 diubah menjadi 1;
2. Hidden, nilai 0 diubah menjadi 1;
3. HideFileExt, nilai 1 diubah menjadi 0.

Bukalah Microsoft Visual Basic anda lalu pilihlah StandardEXE

Masukkan 3 buah CommandButton lalu ganti properties seperti dibawah ini :

Form
Name	frmSSH
BorderStyle	Fixed Single
Caption	Show Super Hidden
ControllBox	False
CommandButton1
Name	cmdLihat
Caption	&Show
CommandButton2
Name	cmdSembunyi
Caption	&Don’t Show
CommandButton3
Name	cmdKeluar
Caption	E&xit

Atur seperti gambar paling atas (image merupakan tambahan saja)

Masukkan source code dibawah ini pada Code Window

'perintah untuk melihat file system
Private Sub Lihat()
On Error Resume Next
RegDword "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden", 1
RegDword "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden", 1
RegDword "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt", 0
MsgBox "Klik kanan lalu Refresh"
End Sub

'perintah untuk menyembunyikan file system
Private Sub Sembunyi()
On Error Resume Next
RegDword "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden", 0
RegDword "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden", 0
RegDword "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt", 1
MsgBox "Klik kanan lalu Refresh"
End Sub

'fungsi untuk merubah nilai pada registry
Function RegDword(HiveAndKey As String, Value As Integer)
Dim newbie As Variant
Set newbie = CreateObject("Wscript.Shell")
newbie.regwrite HiveAndKey, Value, "REG_DWORD"
End Function

Private Sub cmdKeluar_Click()
MsgBox "http://www.kolektor-veebee.blogspot.com"
'keluar
Unload Me
End Sub

Private Sub cmdLihat_Click()
'memanggil perintah lihat
Call Lihat
End Sub

Private Sub cmdSembunyi_Click()
'memanggil perintah sembunyi
Call Sembunyi
End Sub

Jalankan aplikasi dengan menekan F5 lalu compile menjadi .exe

Cara kerja :

• Jalankan aplikasi
• Klik Show
• Klik kanan pada windows / explorer lalu refresh dan lihat hasilnya

Dapatkan Source Code nya di bawah ini atau masuk pada halaman Download
 

Ditulis oleh paijo_jr