Бъг с папките в Windows

Сблъсках се със следния проблем, досега не го бях срещал. При кликване върху дадена папка тя не се отваря или се отваря менюто за търсене(search-a). Отваря се с Expolre само. Компютъра не е прейнсталиран от 5г.(ако не и повече) и може да се сдухал Уина (XP). Пробвах с "reset" на настройките на папките, но нищо не стана. След малко допитване един колега ми обясни как става номера и РАБОТИ! 

Създавате текстов документ и въвеждате това като съдържание:

Set WshShell = WScript.CreateObject("WScript.Shell") p1 = "HKEY_CLASSES_ROOT\Directory\shell\" p2 = "none" WshShell.RegWrite p1, p2 p1 = "HKEY_CLASSES_ROOT\Drive\shell\" WshShell.RegWrite p1, p2 X = WshShell.Run("REGSVR32 /I /S SHELL32.DLL",4,True) Set WshShell = Nothing MyBox = MsgBox("Folders will now Open when double clicked", 4096, "Finished!")

След това го запаметявате и го преименувате на folder_open.vbs
При стартиране, трябва да ви изпише "Folders will now Open when double clicked", рестартирате за всеки случай компютъра и би трябвало да работи (при мен поне стана). Не знам на какво се дължи този проблем. Ако някой има инфо, нека сподели.