VBS の GetAbsolutePathName について
お世話になります。
表題について、質問があります。
WinActor についての情報は、以下です。
****************
バージョン:7.4.3
OS:Windows10
****************
「スクリプト実行」ノードに以下の VBS を記述し、カレントディレクトリを取得しています。(自作VBS)
*********************************************
'ファイルシステムオブジェクト作成
Set objFS = CreateObject("Scripting.FileSystemObject")
strDir = objFS.GetAbsolutePathName(".")
msgbox "strDir :" & strDir
Set objShell = Nothing
*********************************************
この、GetAbsolutePathName の戻り値が意図した結果が返って来ません。
例1)1回目に、C:\test\test.ums7 で実行
カレントディレクトリ → C:\test が返って来る(正しい挙動)
2回目に、C:\test\test2\test.ums7 で実行
カレントディレクトリ → C:\test が返って来る(1回目のパスが返って来る)
※C:\test\test2 が返って来て欲しい
ただし、WinActor を落とした後、C:\test\test2\test.ums7 を実行すると
正しいディレクトリパスが返って来ます。
例2)WinActor - 「ファイル」- 「開く」から開いたシナリオファイルで実行
WinActor のインストールディレクトリが返って来る(例)C:\Program Files (x86)\WinActor7)
どんな場合でも、実行シナリオファイルのカレントディレクトリを
返して欲しいのですが、難しいのでしょうか?
お手数ですが、よろしくお願いいたします。