VBscript Usuario Activo

Bueno esto es un pequeño script que pueden llegar a necesitar para algún tipo de condición.

VBscript Usuario Activo:

Set objNetwork = CreateObject("Wscript.Network")
Wscript.Echo "The current user is " & objNetwork.UserName