msgbox "ファイルパス = " & WScript.ScriptFullName