JP1/Script(Windows(R)用)

[目次][用語][索引][前へ][次へ]

9.4.1 IsEmptyRegレジストリサブキーの中身が空かどうかを調べる

機能
レジストリサブキーの中身が空かどうかをチェックし,結果を真(True)か偽(False)で返します。
チェックの際に例外にするレジストリサブキーを指定できます。
形式
IsEmptyReg ( RegKey , SubKey 〔, ExceptSubKey1 , ExceptSubKey2 , …〕 )
指定項目
RegKey
レジストリキーを指定します。
この値は次のどれかになります。
  • HKEY_CLASSES_ROOT
  • HKEY_CURRENT_USER
  • HKEY_LOCAL_MACHINE
  • HKEY_USERS
SubKey
チェックするレジストリサブキーを文字列,または値を格納した変数名で指定します。
ExceptSubKey127
チェックのときに例外にするレジストリサブキーがある場合,例外にするレジストリサブキーを文字列,または値を格納した変数名で指定します。
複数のレジストリサブキーを指定できます。
説明
指定されたレジストリサブキーの中にレジストリサブキー,またはエントリが存在するかどうかをチェックし,結果をコマンドの実行結果として返します。中身が空の場合は真(True)を,それ以外の場合は偽(False)を返します。
例外にするレジストリサブキーが指定されている場合は,例外キー以外のレジストリサブキー,またはエントリが存在するかどうかをチェックします。
' JP1/Scriptのレジストリサブキーの中身が空かどうかを調べる。
Dim  regKey ,subKey ,isEmp
regKey = HKEY_LOCAL_MACHINE
subKey = "Software\Hitachi\JP1/Script"
isEmp = IsEmptyReg( regKey ,subKey ,"PathName" )
If  isEmp = True  Then
  MessageBox( "Empty !" )
Else
  MessageBox ( "Not Empty !" )
End
対象バージョン
JP1/Script 01-00以降