Liczenie sesji

Autor: Kordian <kordian28WYTNIJTO_at_poczta.onet.pl>
Data: Fri 24 Feb 2006 - 14:35:58 MET
Message-ID: <0aa0.00000129.43ff0bbe@newsgate.onet.pl>
Content-Type: text/plain; charset="iso-8859-2"

Witam,

Chciałbym zrobić 2 rzeczy:
1. Sprawdzać co jakiś czas ilość użytkowników podłączonych do serwera IIS
2. Sprawdzać co jakiś czas ilość użytkowników podłączonych do udostępnionego
katalogu (shared folder).

Chciałbym to robić jakimś skryptem WMI. I teraz:
1. Można sprawdzać log analizerem, ile osoób wchodziło na serwer i jakie było
jego obciążenie. Czy może lepiej robić to za pomocą:
        On Error Resume Next
        strComputer = "remoteComputer"
        Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
        Set colItems = objWMIService.ExecQuery("Select * from
Win32_PerfRawData_ASP_ActiveServerPages",,48)
        For Each objItem in colItems
                Wscript.Echo "SessionDuration: " & objItem.SessionDuration
                Wscript.Echo "SessionsCurrent: " & objItem.SessionsCurrent
                Wscript.Echo "SessionsTimedOut: " & objItem.SessionsTimedOut
                Wscript.Echo "SessionsTotal: " & objItem.SessionsTotal
        Next
        
2. Znalazłem fajny przykład:
        strComputer = "remoteComputer"
        Set objWMI = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
        Set colClass = objWMI.ExecQuery("Select * from Win32_ServerSession",,48)

        On Error Resume Next

        For Each objClass in colClass
                WScript.Echo "UserName: " & objClass.UserName
        Next

ale dostaję komunikat o błędzie sessionsCount3.vbs(7, 1) (null): 0x80041010.
Odpalam na w2k server. Co mogę robić nie tak. Scriptomatic w ogóle nie pokazuje
mi takiej klasy Win32_ServerSession.

Pozdrawiam
Kordian

-- 
Wysłano z serwisu OnetNiusy: http://niusy.onet.pl
Received on Fri Feb 24 14:40:10 2006

To archiwum zostało wygenerowane przez hypermail 2.1.8 : Fri 24 Feb 2006 - 14:42:04 MET