WSH/壁紙ファイルのパスを取得するVBスクリプト

• Prev
• Next
• WSH

壁紙のフルパスを取得するVBスクリプト †

この壁紙ファイル、どこのフォルダ置いてあるの？
このように壁紙のファイルパスを調べたい時に使えるVBスクリプトを作成しましたので公開します。

壁紙のファイルパスは、以下のレジストリに設定されています。
したがって、VBスクリプトは、レジストリ値を取得し表示するスクリプトとなっています。

\HKEY_CURRENT_USER\Control Panel\Desktop\WallPaper

動作確認 †

• Windows 10 21H2
• Windows 11 21H2

取得するレジストリ値のありか †

最初にも書きましたが、以下の場所のレジストリ値を取得します。

\HKEY_CURRENT_USER\Control Panel\Desktop\WallPaper

壁紙のファイルパスを取得するVBスクリプト †

以下のVBスクリプトは、指定したレジストリパスのレジストリ値を取得し表示します。

wallpaperPath.vbs

Dim os
Dim wallpaperPath

Set os = WScript.CreateObject("WScript.Shell")
wallpaperPath = os.RegRead("HKEY_CURRENT_USER\Control Panel\Desktop\WallPaper")
WScript.Echo wallpaperPath

実行結果 †

上記のVBスクリプトを実行した時のキャプチャです。

以上、VBスクリプトを使って壁紙のフルパスを取得する方法でした。