sinon un petit coup de WMI.
Bon ok, je récupère que le nom du produit, sa version et la release.. mais on doit pouvoir creuser plus loin

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\Citrix")
Set colItems = objWMIService.ExecQuery("SELECT * FROM Citrix_Product",,48)
For Each objItem in colItems
Wscript.Echo "ProductName: " & objItem.ProductName & " " & objItem.Version & ", " & "ReleaseLevel: " & objItem.ReleaseLevel
Next