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