JP1/Script(Windows(R)用)
![[目次]](FIGURE/CONTENT.GIF)
![[用語]](FIGURE/GLOSS.GIF)
![[索引]](FIGURE/INDEX.GIF)
![[前へ]](FIGURE/FRONT.GIF)
- 機能
- レジストリサブキーの中身が空かどうかをチェックし,結果を真(True)か偽(False)で返します。
- チェックの際に例外にするレジストリサブキーを指定できます。
- 形式
IsEmptyReg ( RegKey , SubKey 〔, ExceptSubKey1 , ExceptSubKey2 , …〕 )
- 指定項目
- RegKey
- レジストリキーを指定します。
- この値は次のどれかになります。
- HKEY_CLASSES_ROOT
- HKEY_CURRENT_USER
- HKEY_LOCAL_MACHINE
- HKEY_USERS
- SubKey
- チェックするレジストリサブキーを文字列,または値を格納した変数名で指定します。
- ExceptSubKey1〜27
- チェックのときに例外にするレジストリサブキーがある場合,例外にするレジストリサブキーを文字列,または値を格納した変数名で指定します。
- 複数のレジストリサブキーを指定できます。
- 説明
- 指定されたレジストリサブキーの中にレジストリサブキー,またはエントリが存在するかどうかをチェックし,結果をコマンドの実行結果として返します。中身が空の場合は真(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以降
Copyright (C) 2012, Hitachi, Ltd.
Copyright (C) 2012, Hitachi Solutions, Ltd.