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.
Dim SystemInfo, objUser
Set SystemInfo = CreateObject("ADSystemInfo")
Set objUser = GetObject("LDAP://" & SystemInfo.Username)
msgbox objUser.department