NomeUtente = Environ("USERNAME")

oppure la funzione API GetUserName(...)
http://allapi.mentalis.org/apilist/GetUserName.shtml