Link to home
Start Free TrialLog in
Avatar of forsyths_au
forsyths_au

asked on

Trend Micro Worry Free Security Services GPO deployment

We have recently subscribed to the above and below is the standard group policy computer startup script they give you to deploy to workstations
It does not work and after 2 hours with a trendmicro tech person in a webex session, they have no idea either.
I have found vague references to issues with .vbs scripts and using UNC's in computer startup scripts causing issues.

I have tried placing the actual msi installer in differing locations without success, though I can say the script and installer run individually works fine but with a large number of workstation this is not a solution

Any or all help and advice appreciated.



pathOfWFBSHInstaller="msiexec /qn /i \\domain.name\sysvol\domain.name\scripts\WFBS-SVC\WFBS-SVC_Agent_Installer.msi"
strComputer = "."
strOutput = ""
serviceCount = 0
totalServiceCountToCheck = 3

' check if WFBS-SVR is installed by detecting service ntrtscan, tmlisten, svcGenericHost are exist or not
Set objWMIService = GetObject("winmgmts:" _
   & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * from Win32_Service")
For Each objService in colItems
   strOutput = strOutput & objService.name & vbCr & vbLf
   If objService.name = "ntrtscan" Then
       serviceCount = serviceCount + 1
'        Wscript.Echo "Service " & objService.Caption & " is " & objService.Started
   ElseIf objService.name = "tmlisten" Then
       serviceCount = serviceCount + 1
'        Wscript.Echo "Service " & objService.Caption & " is " & objService.Started
   ElseIf objService.name = "svcGenericHost" Then
       serviceCount = serviceCount + 1
'        Wscript.Echo "Service " & objService.Caption & " is " & objService.Started
   End If
Next

If serviceCount <> totalServiceCountToCheck Then
   Dim WshShell
   Set WshShell = CreateObject("WScript.Shell")
   WshShell.Run pathOfWFBSHInstaller
End if
Avatar of merowinger
merowinger
Flag of Germany image

You could try to use an relative path like the path where the Script is located in.
For this it's imprtant that the WFBS-SVC_Agent_Installer.msi and the Script are located in the same Folder.

pathOfWFBSHInstaller="msiexec /qn /i " &Replace(WScript.ScriptFullName, WScript.ScriptName, "")  &"WFBS-SVC\WFBS-SVC_Agent_Installer.msi"

Open in new window

ASKER CERTIFIED SOLUTION
Avatar of forsyths_au
forsyths_au

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Avatar of forsyths_au
forsyths_au

ASKER

We have abandoned the product