8.5.29 GetPath実行フォルダのパスを取得する

機能
実行フォルダのパスを取得します。
形式

GetPath

このコマンドに引数はありません。
説明
現在の実行フォルダのパスを取得し,値をコマンドの実行結果として返します。
実行フォルダがルートフォルダの場合を除き,フォルダ名の末尾には(¥)は付加されません。フォルダ名の末尾に(¥)を付加する場合は,次のレジストリに値を設定してください。
〔レジストリキー〕

HKEY_LOCAL_MACHINE¥Software¥Hitachi¥JP1/Script¥SPTX

〔値名〕

GetPath_Opt

〔値のデータタイプ〕

DWORD

〔値〕

1:末尾に(¥)を付加する

Dim  drv1
SplitPath ( GetPath ,drv1 )
If  drv1 <> "C:"  Then
 SetPath
End

対象バージョン
JP1/Script 01-00以降