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.
Any one knows how to possible run this in a silent way, thks
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