PaulM
Sun Jul 20 13:00:36 CDT 2008
I will give it a try. Thanks
--
-------------------------------------------------------------------------------------
www.paulsxp.com
www.paulsxp.com/forum
www.supportspace.com/home/affiliates.s2?aiu=paulm
------------------------------------------------------------------------------------
"hb21l6" <hb21l6@hotmail.com> wrote in message
news:CA52E446-F3FE-4F87-AAEB-17E9671E153A@microsoft.com...
>
> "PaulM" <paul@paulsxp.com> wrote in message
> news:%23rFWBwf6IHA.4988@TK2MSFTNGP04.phx.gbl...
>> Is there any way to delete a key with subkeys under it with a vbscript?
>> From what I have tried you have to delete all the subkeys first before
>> you can delete the key.
>> exp:
>> To delete the key ddeexec I have to delete the Topic and the Application
>> keys first before I can delete the ddeexec key. Any way around this?
>>
>> WshShell.RegDelete
>> "HKEY_CLASSES_ROOT\FirefoxHTML\shell\open\ddeexec\Application\"
>> WshShell.RegDelete
>> "HKEY_CLASSES_ROOT\FirefoxHTML\shell\open\ddeexec\Topic\"
>> WshShell.RegDelete "HKEY_CLASSES_ROOT\FirefoxHTML\shell\open\ddeexec\"
>
> I think you have to loop though all the keys deleteing them before you can
> delete the topic.
> Using this array, you can delete multiple topics at once.
>
> Const HKEY_CLASSES_ROOT = &H80000000
> Const HKEY_CURRENT_USER = &H80000001
> Const HKEY_LOCAL_MACHINE = &H80000002
> Const HKEY_USERS = &H80000003
> Const HKEY_CURRENT_CONFIG = &H80000005
>
> strComputer = "."
> arrKeys = array(HKEY_CURRENT_USER & "key path",_
> HKEY_CURRENT_USER & "key path",_
> HKEY_CURRENT_USER & "key path",_
> HKEY_LOCAL_MACHINE & "key path")
>
> Set objRegistry = GetObject("winmgmts:\\" & strComputer &
> "\root\default:StdRegProv")
>
> For i=0 to ubound(arrKeys) 'this loops through the arrKeys array"
>
> For Each strKey In arrKeys sCmd = "reg delete /f """ & strKey & """"
> nRC = WshShell.Run ( sCmd, 4, True )Next
> Next
> or something similar..Dave