Print Page - IWshShell.RegDelete Method

Title: IWshShell.RegDelete Method
Post by: José Roca on July 14, 2008, 07:46:42 AM

The following code creates a key and two values, reads them, and deletes them.

JScript


var WshShell = WScript.CreateObject("WScript.Shell");
WshShell.RegWrite ("HKCU\\Software\\ACME\\FortuneTeller\\", 1, "REG_BINARY");
WshShell.RegWrite ("HKCU\\Software\\ACME\\FortuneTeller\\MindReader", "Goocher!", "REG_SZ");
var bKey =    WshShell.RegRead ("HKCU\\Software\\ACME\\FortuneTeller\\");
WScript.Echo (WshShell.RegRead ("HKCU\\Software\\ACME\\FortuneTeller\\MindReader"));
WshShell.RegDelete ("HKCU\\Software\\ACME\\FortuneTeller\\MindReader");
WshShell.RegDelete ("HKCU\\Software\\ACME\\FortuneTeller\\");
WshShell.RegDelete ("HKCU\\Software\\ACME\\");

VBScript

Code Select


Dim WshShell, bKey
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegWrite "HKCU\Software\ACME\FortuneTeller\", 1, "REG_BINARY"
WshShell.RegWrite "HKCU\Software\ACME\FortuneTeller\MindReader", "Goocher!", "REG_SZ"
bKey = WshShell.RegRead("HKCU\Software\ACME\FortuneTeller\")
WScript.Echo WshShell.RegRead("HKCU\Software\ACME\FortuneTeller\MindReader")
WshShell.RegDelete "HKCU\Software\ACME\FortuneTeller\MindReader"
WshShell. RegDelete"HKCU\Software\ACME\FortuneTeller\"
WshShell.RegDelete "HKCU\Software\ACME\"

PowerBASIC

Code Select


DIM pWsh AS IWshShell
DIM vValue AS VARIANT
DIM vType AS VARIANT
DIM vKey AS VARIANT
pWsh = NEWCOM "WScript.Shell"
vValue = 1 AS LONG
vType = "REG_BINARY"
pWsh.RegWrite UCODE$("HKCU\Software\ACME\FortuneTeller\"), vValue, vType
vValue = "Goocher!"
vType = "REG_SZ"
pWsh.RegWrite UCODE$("HKCU\Software\ACME\FortuneTeller\MindReader"), vValue, vType
vKey = pWsh.RegRead(UCODE$("HKCU\Software\ACME\FortuneTeller\"))
vKey = pWsh.RegRead(UCODE$("HKCU\Software\ACME\FortuneTeller\MindReader"))
MSGBOX VARIANT$(vKey)
pWsh.RegDelete UCODE$("HKCU\Software\ACME\FortuneTeller\MindReader")
pWsh.RegDelete UCODE$("HKCU\Software\ACME\FortuneTeller\")
pWsh.RegDelete UCODE$("HKCU\Software\ACME\")

Interactive PowerBasic Forum

Legacy Software (PBWIN 9.0+/PBCC 5.0+) => Source Code => Scripting => Windows Script Host => Topic started by: José Roca on July 14, 2008, 07:46:42 AM