Set objShell = CreateObject("Shell.Application")
objShell.WindowsSecurity