VB.NET Registry işlemleri. "Klasör ekleme, klasör silme, kök klasör silme, value ekleme, value silme"

[ndngailesi]

Arkadaşlar ben bu kodları bulana kadar afedersiniz götümü yırttım yarısını kendim düzenledim. Ve kodlar:

EN ÖNEMLİ NOT: KODLARKEN VİSUAL STUDİOYU YÖNETİCİ OLARAK ÇALIŞYIRIN VE YAPTIGINIZ PROGRAMIDA YOKSA ÇALIŞMAZ.

En üste bu kodu ekleyin ilk önce:

Imports Microsoft.Win32

Not: altdaki kodlarda SOFTWARE klasöründe, ben bir klasör açmak istiyorum ve Klasör Adı bölümünde istediğim klasörün adını yazıyorum.
HKEY_LOCAL_MACHINE üzerinde klasör açma:

        Dim regKey As RegistryKey
        regKey = Registry.LocalMachine.OpenSubKey("SOFTWARE", True)
        regKey.CreateSubKey("Klasörün adı")
        regKey.Close()

HKEY_CURRENT_USER üzerinde klasör açma:

        Dim regKey As RegistryKey
        regKey = Registry.CurrentUser.OpenSubKey("Software", True)
        regKey.CreateSubKey("Klasörün adı")
        regKey.Close()

HKEY_LOCAL_MACHINE üzerinde klasör silme:

        Dim regKey As RegistryKey
        regKey = Registry.LocalMachine.OpenSubKey("SOFTWARE", True)
        regKey.DeleteSubKey("Klasörün adı")
        regKey.Close()

HKEY_CURRENT_USER üzerinde klasör silme:

        Dim regKey As RegistryKey
        regKey = Registry.CurrentUser.OpenSubKey("SOFTWARE", True)
        regKey.DeleteSubKey("Klasörün adı")
        regKey.Close()

HKEY_LOCAL_MACHINE üzerinde kök klasör silme:

        Dim regKey As RegistryKey
        regKey = Registry.LocalMachine.OpenSubKey("Software", True)
        regKey.DeleteSubKeyTree("Klasörün adı")
        regKey.Close()

HKEY_CURRENT_USER üzerinde kök klasör silme:

        Dim regKey As RegistryKey
        regKey = Registry.CurrentUser.OpenSubKey("Software", True)
        regKey.DeleteSubKeyTree("Klasörün adı")
        regKey.Close()

Not1: "HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows Defender" olan yere value ekliyeceğiniz klasörün uzantısını yazınız.
Not2: \DisableAntiSpyware yazan yere valuenin ismini yazacan.
Not3: 1 yazan kısma regeditdeki valueye basınca değer verisi kısmına istediğinizi yazınız. Örnek: @%systemroot%\system32\SecurityHealthAgent.dll, -1002
Not4: REG_DWORD yazan yere altdaki resimde gördüğünüz gibi valuenin türünü yazacan. Örnek REG_SZ
İstediğiniz bir klasörün içine value ekleme:
______________ Örnek Resim ________________

Dim rektry As Object
rektry = CreateObject("WScript.Shell")
rektry.regwrite("HKEY_LOCAL_MACHINE\SOFTWARE\Policies\Microsoft\Windows Defender\DisableAntiSpyware", "1", "REG_DWORD")

Not: SOFTWARE\Policies\Microsoft\Windows Def yazan yere klasörün olduğu yerin uzantısıyla yazın.
Not2: Örnek value kısmınada sileceğiniz valuenin ismini yazınız
HKEY_LOCAL_MACHINE İçinde istediğiniz bir klasörün içinden istediğiniz value'yi silme:

        Dim key As Microsoft.Win32.RegistryKey
        key = Microsoft.Win32.Registry.LocalMachine.OpenSubKey("SOFTWARE\Policies\Microsoft\Windows Def", True)
        key.DeleteValue("Örnek value")

HKEY_CURRENT_USER İçinde istediğiniz bir klasörün içinden istediğiniz value'yi silme:

        Dim key As Microsoft.Win32.RegistryKey
        key = Microsoft.Win32.Registry.CurrentUser.OpenSubKey("SOFTWARE\Policies\Microsoft\Windows Def", True)
        key.DeleteValue("Örnek value")

 

[OxyGevA]

HKEY_LOCAL_MACHINE üzerinde klasör silme:
Kod:
Dim regKey As RegistryKey
regKey = Registry.LocalMachine.OpenSubKey("SOFTWARE", True)
regKey.CreateSubKey("Klasörün adı")
regKey.Close()

Yanlışlık var hocam.

 

[ndngailesi]

HKEY_LOCAL_MACHINE üzerinde klasör silme:
Kod:
Dim regKey As RegistryKey
regKey = Registry.LocalMachine.OpenSubKey("SOFTWARE", True)
regKey.CreateSubKey("Klasörün adı")
regKey.Close()

Yanlışlık var hocam.

Söle bakalım nerede yanlış yapmışım


simdi gördüm

 

[OxyGevA]

Söle bakalım nerede yanlış yapmışım


simdi gördüm

canın sağolsun olur öyle

Post automatically merged: 1 Mar 2019

Hocam peki varolan bir klasör ismiyle yeni bir klasör açmayı denersek, adlandırma nsıl oluyor ? (1), (2) şeklinde windows orjinali değil mi ?

 

[ndngailesi]

canın sağolsun olur öyle

Post automatically merged: 1 Mar 2019

Hocam peki varolan bir klasör ismiyle yeni bir klasör açmayı denersek, adlandırma nsıl oluyor ? (1), (2) şeklinde windows orjinali değil mi ?

var olan bir klasörün adıyla aynı yerde açamazsın ama başka yerde açabilirsin mesela HKEY_CURRENT_USER\Software klasöründe Adobe isimli bir klasör var ama ben HKEY_CURRENT_USER\Software\Clients klasöründe Adobe diye bir klasör açabilirim.

Post automatically merged: 1 Mar 2019

canın sağolsun olur öyle

Post automatically merged: 1 Mar 2019

Hocam peki varolan bir klasör ismiyle yeni bir klasör açmayı denersek, adlandırma nsıl oluyor ? (1), (2) şeklinde windows orjinali değil mi ?

kodlarla ilgili sölüyorsan klasörü değiştirir. Yada hiç bişey yapmaz

 

[AtaXS]

saol kanka

 

[NightStar]

Eline sağlık