Officepack plugin does not send information- DB

Question

Hello,

The agent does not record the information of the officepack plugin in the generated xml. I already place the .vbs file and it does not work .. I check the database and it does not register Office information either.

Any suggestions?

Answer 1

Hi,

when you manually run the VBS on the client PC, do the plugin information appear on the screen?

Note: No need to create multiple requests for the same problem, it will not go faster...

Regards, Stéphane

Answer 2

Hi ,

nothing appears when I run the .vbs.

I am sorry

Answer 3

Ok, the problem may be here: Incorrect execution of the VBS script or your Office package not recognized by the script (wrong version, etc.) !

To be sure, you can create a new VBS file with only the following content :

On Error Resume Next

Wscript.Echo _
 "<OFFICEPACK>" & vbCrLf &_
 "<OFFICEVERSION>LEURRE_VERS</OFFICEVERSION>" & vbCrLf &_
 "<PRODUCT>LEURRE_PROD</PRODUCT>" & vbCrLf &_
 "<PRODUCTID>LEURRE_PRODID</PRODUCTID>" & vbCrLf &_
 "<TYPE>LEURRE_ARCHI</TYPE>" & vbCrLf &_
 "<OFFICEKEY>LEURRE_CLE</OFFICEKEY>" & vbCrLf &_
 "<GUID>LEURRE_GUID</GUID>" & vbCrLf &_
 "<INSTALL>LEURRE_INST</INSTALL>" & vbCrLf &_
 "<NOTE>LEURRE_NOTE</NOTE>" & vbCrLf &_
 "</OFFICEPACK>"

When you manually run this file, you must see a window with the content between tags ...

> Temporarily replace your msofficekey.vbs file with this file on the client machine in "C:\Program Files (x86)\OCS Inventory Agent\Plugins\" folder and run a new inventory :

The contents of this new file must appear in OCSReports !

Which version of the Office Pack do you have?

You can get the latest version of VBS on GitHub (some fixes and Office compatibility improvements added) : https://github.com/PluginsOCSInventory-NG/officepack

Regards, Stéphane

Answer 4

Hi

perform the following:

place in the .vbs only what you send me and a record appears in the ocs reports with the information that registers between the tags. I send image.

Question: Should not it appear with the office license information? I am doing something wrong?
I'm good?

Answer 5

In OCS reports, the display of the line "LEURRE ..." proves that the plugin is correctly installed on the server and that the VBS script is also executed and integrated with the other information by the agent of the inventory.

Note: The VBS file I have provided is for test purposes only, you can delete it and replace it with the actual VBS script "msofficepack.vbs".

There is therefore a problem with your VBS or Microsoft Office version that is not correctly detected by the VBS.

Did you recover the updated VBS as I proposed to you on the GitHub website ?

What version of the Office package do you have ?

Answer 6

Hi,

update the .vbs with the github page and place it in the path c: programfiles (x86) ocsinventory / plugins / but when executing it, it does not send information from the office license to the server.

The offiece package that I have in my machine is

I send the result of my server after running the agent with the updated .vbs.

Answer 7

So unfortunately the version of your Office package is not recognized by the VBS script and it must be updated for this to work...
> I'm surprised by that !

Answer 8

hi,

How can you help me please, any suggestions? Can you think of any improvement?

Answer 9

Please, try this VBS script on your Windows client and tell me what is displayed :

Dim oRegistry, oWMIService, colFiles, oFile, sKey, sAppExe, sValue, sAppVersion
Const HKEY_LOCAL_MACHINE = &H80000002

Set oRegistry = GetObject("winmgmts:root/default:StdRegProv")
Set oWMIService = GetObject("winmgmts:root\cimv2")
' sKey = "Software\Microsoft\Windows\CurrentVersion\App Paths"    ' 32 bits Windows
sKey = "Software\Wow6432Node\Microsoft\Windows\CurrentVersion\App Paths" ' 64 bits Windows
'sAppExe = "excel.exe"
sAppExe = "winword.exe"
oRegistry.GetStringValue HKEY_LOCAL_MACHINE, sKey & "\" & sAppExe, "", sValue
Set colFiles = oWMIService.ExecQuery _
 ("Select * from CIM_Datafile Where Name = '" & replace(sValue, "\", "\\") & "'")
For Each oFile in colFiles
 MsgBox oFile.Version
Next

Set colFiles = Nothing
Set oWMIService = Nothing
Set oRegistry = Nothing

Which architecture on your Windows client (32 or 64 bits) ?

Answer 10

I have windows 10 of 64 bist.

execute the script that sent me and a window appeared with a number. I send the image.

very grateful for his prompt help and collaboration.