Shell does not recognise a batchfile unless its compiled bat2exe or embedded within a cmd command.
I got the following working, but it throws up the console window.
Code: Select all
Sub modp
Dim objExec As Object
objExec = createUnoService("com.sun.star.system.SystemShellExecute")
objExec.execute("C:Windows\system32\cmd.exe", "/d /c ""C:\LDS\sMplan\lib\setm.bat""", 0)
End Sub