Übergeben von Anmeldeinformationen für WMI-Aufruf in VBScript

Ich habe VBScript innerhalb einer HTA immer den ping-status von einem lokalen WMI-Aufruf.. ich habe auch eine Funktion, um die letzten reboot-Zeit der remote-pc..

Function GetReboot(strComputer)
    Set objWMIService = GetObject _
        ("winmgmts:\\" & strComputer & "\root\cimv2")
    Set colOperatingSystems = objWMIService.ExecQuery _
        ("Select * from Win32_OperatingSystem")
    For Each objOS in colOperatingSystems
        dtmBootup = objOS.LastBootUpTime
        dtmLastBootupTime = WMIDateStringToDate(dtmBootup)
        dtmSystemUptime = DateDiff("h", dtmLastBootUpTime, Now)
        Wscript.Echo dtmSystemUptime
    Next
    GetReboot = dtmLastbootupTime
End Function

Dass ist ungefähr das, was es ist, natürlich kann ich Variablen deklarieren und haben ein anderes Datum-Funktion etc..

Dies funktioniert, wenn ich WMI-Aufruf "localhost", wie ich bin lokaler admin.. aber wenn du die WMI-Aufruf von einem remote-server funktioniert das nur, wenn ich eingeloggt bin auf meiner lokalen Maschine mit einem AD-admin-account.

Gibt es eine Möglichkeit, ich kann den Benutzer auffordern, einen Benutzernamen und ein Passwort übergeben, um die WMI-Aufruf, so dass es funktioniert wie jeder nur mit den admin-Daten?

InformationsquelleAutor medoix | 2010-10-14

Schreibe einen Kommentar