roichan2さん、こんにちは。

＞早速のお返事ありがとうございます。
＞
＞アプリケーション名：rejistr
＞ファイル名：rejistr.exe、rejistrt.pbl、apphelp（ネットワークドライブ上）
＞registr.exeへのショートカットをローカルドライブに作成
＞ショートカットのプロパティの作業ディレクトリをc:\\pbapps\\rejistr\\data
＞に設定。
＞
＞このように設定、使用しています。
＞この状況でisii様のサンプルでは
＞PathNameにc:\\pbapps\\rejistr\\data
＞が取得されています。
＞またFileNameは何も入っていないことを確認しました。
＞
＞このとき、PathNameにg:\\とか、\\\\redhatとかrejistr.exeのフルパスを取得したいのです。
＞
＞よろしくお願い致します。
実行ファイル名が2種類あるのですがどちらが正しいのでしょうか？
rejistr.exe、registr.exe
アプリケーション名がrejistrの場合は、実行ファイル名をrejistr.exeでない場合、カレント
ディレクトリ（作業フォルダ）を返すようにしています。
アプリケーション名は、フォルダ名とファイル名を分解するための基準として使用しています。

FileNameに何も入っていないのは、使用しているスクリプトに影響していると思います。
コントロール（コマンドボタン等）のスクリプトで使用する場合は、thisではなくparentに変更
しないと、アプリケーションのハンドルが求まりません。
GetModuleFileNameA( Handle( parent ), FileName, lBuf )

（記述例は、実はユーザー関数を抜き出した物です。）