質問: VBScriptで「WScript.Arguments」があるとGetFolder(".")できない。
回答: まず、事象は正確に表現するよう心掛けて下さい。 ×GetFolder(".")できない ○GetFolder(".")の返り値が質問者の想定外 それで、ウチのWin10.0.14393では再現しません。 ・CScript.exeから起動 ・WScript.exeから起動 ・エクスプローラーからダブルクリック 全て基本的にカレントディレクトリが返って来ます。 但し、 ・C:\Windows\System32の中のファイルをドラッグ してきてドロップ した場合には、確かに >カレントディレクトリが「C:\Windows\System32」に なりましたが。起動方法の問題?! Set so = CreateObject("Scripting.FileSystemObject") Set gf = so.GetFolder(".") WScript.Echo gf.Path Set wa = WScript.Arguments WScript.Echo gf.Path WScript.Echo so.GetFolder(".").Path Set wa = Nothing Set gf = Nothing Set so = Nothing >>プログラムファイル自身が存在するフォルダを取得 原因は不確定ですが、解決したいだけなら↓