Re: VBScript czym to sie rozni

Autor: Michal Biek <mb_at_2.pl.invalid>
Data: Mon 10 Apr 2006 - 22:33:04 MET DST
Message-ID: <mbR2xNi_CFsI@localhost>
Content-Type: text/plain; charset=iso-8859-2

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 

-- 
"... Chrupiesz i jedziesz dalej! ...
My idziemy równym krokiem ...
Dzięki czemu odzyskasz pełną formę ...
Chcesz trochę? ..."
Received on Mon Apr 10 22:35:08 2006

To archiwum zostało wygenerowane przez hypermail 2.1.8 : Mon 10 Apr 2006 - 22:42:02 MET DST