Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Option Explicit
Dim strComp, oGrp, oUsr
On Error Resume Next
strComp = "."
Set oGrp = GetObject("WinNT://" & strComp & "/Power Users")
Set oUsr = GetObject("WinNT://YourDomain/Domain Users")
oGrp.Add(oUsr.ADsPath)