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 objComputer : Set objComputer = GetObject("WinNT://servername/LanmanServer")
Dim objSession
For Each objSession In objComputer.Sessions
WScript.Echo objSession.User
Next