Are you talking about this script??
Const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
Set objRegistry = GetObject("winmgmts:\\" & _
strComputer & "\root\default:StdRegProv")
strKeyPath = "SOFTWARE\Microsoft\Windows NT\CurrentVersion"
strValueName = "SystemRoot"
objRegistry.GetStringValue
HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue
If IsNull(strValue) Then
Wscript.Echo "The registry key does not exist."
Else
Wscript.Echo "The registry key exists."
End If
It works fine in Windows 7.
--
Windows XP and Vista Tweaks
------------------------------------------------------------
www.paulsxp.com
------------------------------------------------------------
Windows XP and Vista Help Forum
------------------------------------------------------------
www.paulsxp.com/forum
------------------------------------------------------------
Live Computer Help and Chat
------------------------------------------------------------
www.paulsxp.com/livesupport.html
------------------------------------------------------------
"Mark D. MacLachlan" <markdmac@xxxxxx> wrote in message
news:e1iRgom#JHA.1376@xxxxxx
Quote:
> אמיר עטרי wrote:
> Quote:
>> HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Uninstall
>> \{388E4B09-3E71-4649-8921-F44A3A2954A7}
>
> Take a look at this Hey Scripting Guy:
> http://www.microsoft.com/technet/scr...nda/oct04/hey1
> 029.mspx
>
> One thing to mention though is that in my testing it does nto seem to
> work on Windows 7. Not sure about Vista. I beleive this is a bug.
>
> Hope that helps,
>
> Mark D. MacLachlan
>
> --
>