>>loNetwork = CreateObject("WScript.Network") >>lcUserName = loNetwork.UserName >>lcUserDomain = loNetwork.UserDomain >>