Es muy útil para aquellos que trabajan bastante desde la linea de comandos, y necesitan acceso a CMD desde cualquier carpeta del Explorador de archivos.
Con éste código podemos sacar el acceso:
Set objShell = CreateObject("WScript.Shell")
objShell.RegWrite "HKCR\Folder\Shell\MenuText\Command\", "cmd.exe /k cd " & chr(34) & "%1" & chr(34)
objShell.RegWrite "HKCR\Folder\Shell\MenuText\", "Command Prompt Here"

un saludo.
No hay comentarios:
Publicar un comentario