Regedit İşlemi

Const HKEY_CLASSES_ROOT  = &H80000000
Const HKEY_CURRENT_USER  = &H80000001
Const HKEY_LOCAL_MACHINE = &H80000002
Const HKEY_USERS         = &H80000003

strComputer = "."
strKeyPath = "Software\Test"

Set objRegistry = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv")

DelSubkeysHKCU HKEY_CURRENT_USER, "Software\Bentley\Licensing\1.1\"
DelSubkeysHKLM HKEY_LOCAL_MACHINE, "Software\Wow6432Node\Bentley\Licensing\1.1\"

Sub DelSubkeysHKLM(HKEY_LOCAL_MACHINE, strKey)
    objRegistry.EnumKey HKEY_LOCAL_MACHINE, strKey, arrSubKeys
    If IsArray(arrSubKeys) Then
        For Each strSubkey In arrSubKeys
            DelSubkeysHKLM HKEY_LOCAL_MACHINE, strKey & "\" & strSubkey
        Next
    End If
    objRegistry.DeleteKey HKEY_LOCAL_MACHINE, strKey
End Sub

Sub DelSubkeysHKCU(HKEY_CURRENT_USER, strKey)
    objRegistry.EnumKey HKEY_CURRENT_USER, strKey, arrSubKeys
    If IsArray(arrSubKeys) Then
        For Each strSubkey In arrSubKeys
            DelSubkeysHKCU HKEY_CURRENT_USER, strKey & "\" & strSubkey
        Next
    End If
    objRegistry.DeleteKey HKEY_CURRENT_USER, strKey
End Sub

Gizli Dosyaların Gösterilmesi

gdosyalar.reg diye dosya oluşturulup içine alttaki bilgiler yazılacak

Windows Registry Editor Version 5.00
[-HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Curr entVersion\Explorer\Advanced\Folder\Hidden]
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Curr entVersion\Explorer\Advanced\Folder\Hidden]
"Text"="@shell32.dll,-30499"
"Type"="group"
"Bitmap"=hex(2):25,00,53,00,79,00,73,00,74,00,65,0 0,6d,00,52,00,6f,00,6f,00,74,\
00,25,00,5c,00,73,00,79,00,73,00,74,00,65,00,6d,00 ,33,00,32,00,5c,00,53,00,\
48,00,45,00,4c,00,4c,00,33,00,32,00,2e,00,64,00,6c ,00,6c,00,2c,00,34,00,00,\
00
"HelpID"="shell.hlp#51131"
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Curr entVersion\Explorer\Advanced\Folder\Hidden\NOHIDDE N]
"RegPath"="Software\\Microsoft\\Windows\\CurrentVe rsion\\Explorer\\Advanced"
"Text"="@shell32.dll,-30501"
"Type"="radio"
"CheckedValue"=dword:00000002
"ValueName"="Hidden"
"DefaultValue"=dword:00000002
"HKeyRoot"=dword:80000001
"HelpID"="shell.hlp#51104"
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\Curr entVersion\Explorer\Advanced\Folder\Hidden\SHOWALL]
"RegPath"="Software\\Microsoft\\Windows\\CurrentVe rsion\\Explorer\\Advanced"
"Text"="@shell32.dll,-30500"
"Type"="radio"
"CheckedValue"=dword:00000001
"ValueName"="Hidden"
"DefaultValue"=dword:00000002
"HKeyRoot"=dword:80000001
"HelpID"="shell.hlp#51105"
[HKEY_CURRENT_USER\Software\microsoft\Windows\Curre ntVersion\Explorer\Advanced]
"Hidden"=dword:00000001

Klasör Seçenekleri Menüsü

Başlat /Çalıştır a Gpedit.msc yaz
Grup ilkesi penceresi açılacak
Kullanıcı yapılandırması /
       Yönetim şablonları /
            Windows bileşenleri /
                 Windows gezgini kısmına tıkladığında sağ taraftaki listede

"Klasör seçenekleri öğesini araçlar menüsünden kaldır" diye bi ayar var. ona sağ tıklayıp özelliklerden devre sışı yaparsan Klasör seçenekleri menüsü geri gelecektir.