2010-07-16 20:49

/* Displays basic connection information (including whether HTTP 1.1 has been enabled) for Internet Explorer */
strcomputer = "."
objwmiservice = getobject("winmgmts:{impersonationLevel=impersonate}!\\" || strcomputer || "\root\cimv2\Applications\MicrosoftIE")
coliesettings = objwmiservice~execquery("Select * from MicrosoftIE_ConnectionSummary")
DO striesetting OVER coliesettings
	SAY "Connection preference:" striesetting~connectionpreference
	SAY "HTTP 1.1. enabled:" striesetting~enablehttp11
	SAY "Proxy HTTP 1.1. enabled:" striesetting~proxyhttp11
	SAY
END

2010-07-16 20:49