Функция getUserName.

Функция getUserName возвращает имя текущего пользователя системы.

Function getUserName()

    Set objNetwork = CreateObject("Wscript.Network")
    getUserName = objNetwork.UserName

End Function

Пример:

WScript.Echo "User name: " & Chr(34) & getUserName() & Chr(34)
Вывод скрипта
User name: "Scott_Tiger"