WSHでは、WScript.exeから起動するときに引数を渡して起動した場合（つまり、スクリプトファイルにドラッグ＆ドロップでファイルを投げ込んで起動したような場合）、カレントディレクトリが C:\Windows\System32 とかになっちゃう。
そこで強制的にカレントディレクトリを、実行ファイルのある場所に設定するのが以下のスニペット。
Set FSO = CreateObject("Scripting.FileSystemObject")
Set WShell = CreateObject("WScript.Shell")
WShell.CurrentDirectory = FSO.GetFile(WScript.ScriptFullName).ParentFolder.Path
