roichan2さん、こんにちは。

＞失礼しました。ファイル名はrejistr.exeです。
＞
＞今、app.AppNameとFileName、CurDirの３つを表示させたところ
＞rejister、空白、C:\\pbapps\\rejistr\\dataと表示されました。
＞
＞スクリプトはウィンドウのOpenイベントに記述しているので、thisでいいと思います。
＞ほしい情報は、作業ディレクトリと、exeファイルの存在するディレクトリです。
＞ショートカットから実行だとこの方法だと取得できないのでしょうか？
＞作業ディレクトリは取得できているのですが・・・
＞
＞たびたびすみませんがよろしくお願い致します。
APIのGetModuleFileName()で取得できていない理由が全くわかりません。
GetModuleFileNameA()の戻り値や、APIのGetLastError()呼んで、何らかのエラー
が起きていないか調べてください。
GetModuleFileName()、GetLastError()は、SDKドキュメント等で調べてください。

お役に立てず申し訳御座いません。