Michal Biek wrote:
> MrKramer log:
>
> Hi!
>> [...]
>> Jak przy pomocy "username" pobrac zalogowanego uzytkownika?
>> Jak do tego podejsc?
>>
> |
> ||
> |||
> VVVV
> Zalogowany_User.vbs
> -----
> strComputer = "."
>
> Set objWMIService = GetObject("winmgmts:" _
> & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
>
> Set colComputer = objWMIService.ExecQuery _
> ("Select * from Win32_ComputerSystem")
>
> For Each objComputer in colComputer
> Wscript.Echo "Zalogowany Użytkownik: " & objComputer.UserName
> Wscript.Echo " ... no i MrKramer GL&BE!;-)"
> Next
Uuuu, wyzsza skola jazdy jak dla mnie.
Zapomnialem tez dodac ze chodzilo mi o sprawdzenie uzytkownika na innym
koputerze w LAN.
Received on Tue Apr 11 07:05:11 2006
To archiwum zostało wygenerowane przez hypermail 2.1.8 : Tue 11 Apr 2006 - 07:42:03 MET DST