var row = new ActiveXObject("WScript.Network");
var compname = row.ComputerName;

Соответственно выведется имя компа.. если нужно имя юзера - row.UserName соответственно... Но этот способ использует актив-иксовский объект, следовательно делай выводы.