Network = Новый ComОбъект("WScript.Network");
Сообщить(Network.UserDomain+"\"+Network.UserName);
Чтобы обнаруживать ошибки, программист должен иметь ум, которому доставляет удовольствие находить изъяны там, где, казалось, царят красота и совершенство. Фредерик Брукс-младший