Re: VBScript czym to sie rozni

Autor: MrKramer <mkramer_at_poczta.fm>
Data: Tue 11 Apr 2006 - 07:04:41 MET DST
Message-ID: <e1fddk$naf$1@atlantis.news.tpi.pl>
Content-Type: text/plain; charset=ISO-8859-2; format=flowed

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