Winfried,

On 31/05/2016 11:46, Winfried Donkers wrote:
Hi Fernand,

works as normal  for me on (windows) LO 5.1.2.2 greetz Fernand On

The LO-part of the scripts start with the line

    Set oServiceManager = CreateObject( "com.sun.star.ServiceManager" )

Do you  mean that the following vbscript:

  option explicit

  Dim t

  set t = WScript.CreateObject( "com.sun.star.ServiceManager")
  msgbox "srv-mgr created"
  set t = nothing

  set t = CreateObject( "com.sun.star.ServiceManager")
  msgbox "srv-mgr created again"
  set t = nothing

runs without error on your machine with windows and LO5.1.2.2?

Here, I use LO 5.1.3.2 and Windows7-64; neither of the 2 CreateObject calls 
succeed.

Winfried
Nono Sorry
I just run under LO basic the folowing sub where Xray returns the ServiceManager

sub test
Set oServiceManager = CreateObject( "com.sun.star.ServiceManager" )
xray oServiceManager
end sub


_______________________________________________
LibreOffice mailing list
LibreOffice@lists.freedesktop.org
https://lists.freedesktop.org/mailman/listinfo/libreoffice

Reply via email to