On Error Resume Next HKEY_CURRENT_USER = &H80000001 strComputer = "." Set objReg = GetObject("winmgmts:\\" & strComputer & "\root\default:StdRegProv") strKeyPath = "Software\Microsoft\Windows\CurrentVersion\Internet Settings\Zones\3" ValueName = "1609" objReg.GetDWORDValue HKEY_CURRENT_USER, strKeyPath, ValueName, dwValue If IsNull(strValue) Then Wscript.Echo "Display content from both secure and non-secure servers (Zone 3): The value is either Null or could not be found in the registry." Else Wscript.Echo "Display content from both secure and non-secure servers (Zone 3): ", dwValue End If