remote install

Hejsa

Jeg har et netværks share med en inventory service som jeg skal have ud på mine klienter.

Jeg har fikset så de får via login script, men vil gerne lave sådan at hvis der skulle være en maskine som ikke er logget op mod serveren på vores lan, at jeg kan eksekvere kommandoen remote med et vbs script.

Jeg har fundet dette script fra ms der skulle kunne gøre det men jeg kan ikke få det til at virke, det er måske mig der ikke forstår det :(

Håber i kan hjælpe

Const wbemImpersonationLevelDelegate = 4

Set objWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objConnection = objwbemLocator.ConnectServer _
    ("WebServer", "root\cimv2", "fabrikam\administrator", _
        "password", , "kerberos:WebServer")
objConnection.Security_.ImpersonationLevel = wbemImpersonationLevelDelegate

Set objSoftware = objConnection.Get("Win32_Product")
errReturn = objSoftware.Install("\\atl-dc-02\scripts\1561_lab.msi",,True)