Desktop Management
Internet Explorer
List Internet Explorer Security Setting Values , WMI
' List Internet Explorer Security Setting Values
On Error Resume Next
Const HKEY_CURRENT_USER = &H80000001
strComputer = "."
strEntry = "1400"
Set objReg = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}\\" & strComputer & _
"\root\default:StdRegProv")
strKeyPath = "Software\Microsoft\Windows\CurrentVersion\Internet Settings\" _
& "Zones\1"
objReg.GetDWORDValue HKEY_CURRENT_USER, strKeyPath, strEntry, dwValue
Select Case dwValue
Case 0 strSetting = "Enabled"
Case 1 strSetting = "Prompt"
case 3 strSetting = "Disabled"
End Select
Wscript.Echo "Allow scripting: " & strSetting
|
VbsEdit includes all these samples!
Download Now!
Version 5.4.1 - This package includes VbsEdit 32-bit, VbsEdit 64-bit, HtaEdit 32-bit and HtaEdit 64-bit.
The evaluation version never expires.
Home
Buy Now
HtaEdit
Support
Video
What's new ?
|