سلام.
من می خوام مقدار یک دیتا از رجیستری رو تغییر بدم. تغییرات اعمال می شه ولی در کلید اصلی رجیستری ویندوز که با RegEdit مشاهده می کنم تغییراتی اعمال نمی شه!!!!!
ینی چی؟!
ویندوز من 64 بیتی هست
ویژوال استودیو 2010 استفاده می کنم



Dim GlobalKey As RegistryKey

GlobalKey = My.Computer.Registry.LocalMachine.OpenSubKey("SOFT  WARE\Microsoft\Windows\CurrentVersion\Explorer\Fol  derDescriptions")



        Select Case FolderName.ToUpper

            Case "3D OBJECTS" : Key = "{31C0DD25-9439-4F12-BF41-7FF4EDA38722}"

            Case "DESKTOP" : Key = "{B4BFCC3A-DB2C-424C-B029-7FE99A87C641}"

            Case "DOCUMENTS" : Key = "{f42ee2d3-909f-4907-8871-4c22fc0bf756}"

            Case "DOWNLOADS" : Key = "{7d83ee9b-2244-4e70-b1f5-5393042af1e4}"

            Case "MUSIC" : Key = "{a0c69a99-21c8-4671-8703-7934162fcf1d}"

            Case "PICTURES" : Key = "{0ddd015d-b06c-45d5-8c4c-f59713854639}"

            Case "VIDEOS" : Key = "{35286a68-3c57-41a1-bbb1-0eae73d76c95}"

        End Select

        With GlobalKey.OpenSubKey(Key).OpenSubKey("PropertyBag"  , True)

            Console.WriteLine(.GetValue("ThisPCPolicy", "?").ToString)

            .SetValue("ThisPCPolicy", "Hide")

        End With

Console.WriteLine("{0} set to Hile", FolderName)


Snapshot_231224112946.png

Snapshot_231224112912.png