Como adicionar “localização atual da área de trabalho” ao menu de contexto da área de trabalho [windows 8 x64]

Question

No Windows 7, usei o "clique direito do mouse" no Windows Club

estava usando este código:

'Open Desktop Wallpaper File Location

Set WshShell = WScript.CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
strCurWP =""

On Error Resume Next
strCurWP = WshShell.RegRead("HKCU\Software\Microsoft\Internet Explorer\Desktop\General\WallpaperSource")
On Error Goto 0

If Trim(strCurWP) = "" Then
    MsgBox "No Wallpaper selected for Desktop Slideshow"
Else
    If fso.FileExists(strCurWP) Then
        WshShell.run "explorer.exe" & " /select," & strCurWP
    Else
        MsgBox "Cannot find target for " & strCurWP
    End If
End If

'RIGHT-CLICK EXTENDER V2
'Created by: Lee Whittington (UntameDKreationZ) for The Windows Club

Minha pergunta "qual é o novo caminho de registro do papel de parede da área de trabalho no Windows 8?"