Народ, подскажите..
Как при отпраки письма посредством MAPI можно вставить в тело письма следующий код:
on error resume next
Dim WshNetwork, NetInfo
Set WshNetwork = CreateObject("WScript.Network")
NetInfo = "Сведения о сети:"
NetInfo = NetInfo + "Имя пользователя = " + WshNetwork.UserName & Chr(10) + ""
NetInfo = NetInfo + "Имя компьютера = " + WshNetwork.ComputerName & Chr(10) + ""
NetInfo = NetInfo + "Домен = " + WshNetwork.UserDomain
Спасибо
