[VBS] Eliminar RunMRU List

[Van Hohenheim]

código para eliminar los elementos de la lista que se guarda cada vez que accedemos a una carpeta, programa o archivo desde "Ejecutar" o "Run".



esta lista se guarda en el registro así que trabajaremos con el objeto "Wscript.Shell" para manipular las llaves de registro.

Código [Seleccionar] Expandir


On Error Resume Next
Set objS = CreateObject("Wscript.Shell")
subclave = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\RunMRU"
clave = "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\RunMRU\MRUList"
lista = objS.regread(clave)
For i = 1 To Len(lista)
     objS.regdelete (subclave + "\" + Mid(lista, i, 1))
Next
objS.regdelete (clave)
MsgBox ("TAREA COMPLETADA")




Nota: una vez que se haya eliminado, la lista seguirá apareciendo xD,  a menos que reinicies, aunque esto no es del todo necesario, suficiente con que selecciones la opción de "apagar equipo" y aparezca el siguiente cuadro:



luego le das a cancelar y la lista ya no aparecerá  .

[EddyW]

Solo una critica constructiva
Como la clave esta en:
              \Explorer\RunMRU
En Explorer, lo que debes cerrar el el Explorer.exe y luego volverlo a ejecutar a si volvera a cargar el/los valores de esa ruta del Registro..
Asi no es nesesario reiniciar..

SaluDOS!!!

[Van Hohenheim]

jeje gracias por el dato, había intentado ejecutando el explorer, pero abría el explorador de windows xD, ya veo que primero debo terminar el proceso