Benutzername, ComputerName und Domain

<p>Den aktuell angemeldeten Benutzernamen mit Windows Script Host herausbekommen</p>
<p>&nbsp;</p>
<div class="VBA_code"><span>Option Explicit</span>
<p><span>Dim </span>fs<br /> <span>Dim </span>wshNetwork<br /> <span>Dim </span>sUser, sUDomain, sComputer</p>
<p><span>Set </span>wshNetwork = CreateObject("<span>WScript</span>.Network")<br /> sUser = wshNetwork.Username<br /> sUDomain = wshNetwork.UserDomain<br /> sComputer = wshNetwork.ComputerName</p>
<p><span>WScript</span>.Echo "Angemeldeter Benutzer: " &amp; sUser<br /> <span>WScript</span>.Echo "Domain: " &amp; sUDomain<br /> <span>WScript</span>.Echo "Computer: " &amp; sComputer</p>
</div>