Windows で有効
RegDeleteVariable 関数によって、特定の変数が削除されます。
関数の形式
RegDeleteVariable(hKey as integer, name as string) as Boolean
現在開いているキーまたは事前定義されたキーを示します。 hKey パラメータには、以下のいずれかの事前定義された値を指定できます。
HKEY_CLASSES_ROOT
HKEY_CURRENT_USER
HKEY_LOCAL_MACHINE
HKEY_USERS
削除する変数の名前を指定します。
この関数が正常に完了すると、TRUE が返されます。それ以外の場合は、FALSE が返されます。
例:
テスト構造:
HKLM\
\ Software
\ CA
\ 4 test only
\ var_6
\ dummy
Dim hkey1 as integer
ClrScr()
hkey1 = RegOpenKey(HKEY_LOCAL_MACHINE, "SOFTWARE\CA\4 test only")
if hkey1 = 0 then
Print("RegOpenKey failed.")
exit
endif
if RegDeleteValue(hKey1) then
Print("RegDeleteValue succeeded.")
else
Print("RegDeleteValue failed.")
endif
if RegDeleteVariable(hKey1, "var_6") then
Print("RegDeleteVariable for var_6 succeeded.")
else
Print("RegDeleteVariable for var_6 failed.")
endif
RegCloseKey(hkey1)
hkey1 = RegOpenKey(HKEY_LOCAL_MACHINE, "SOFTWARE\CA")
if hkey1 = 0 then
Print("RegOpenKey failed.")
exit
endif
if RegDeleteKey(hkey1, "dummy") then
Print("Key dummy successfully deleted")
else
Print("Key dummy deletion failed.")
endif
RegCloseKey(hkey1)
Messagebox("Check registry!", "desktop management scripting test")
hkey1 = RegOpenKey(HKEY_LOCAL_MACHINE, "SOFTWARE")
if hkey1 = 0 then
Print("RegOpenKey failed.")
exit
endif
if RegDeleteKey(hkey1, "CA\4 test only") then
Print("Key ""CA\4 test only"" successfully deleted")
else
Print("Key" "CA\4 test only" "deletion failed.")
endif
if RegDeleteKey(hkey1, "CA") then
Print("Key CA successfully deleted")
else
Print("Key CA deletion failed.")
endif
RegCloseKey(hkey1)
|
Copyright © 2014 CA Technologies.
All rights reserved.
|
|