Dim sh As Shell
sh.Initialize("sh","java", Array As String("-jar", "vPDFcCL.jar", fn2&"/"&fn1, fn1.Replace(".rtf",".pdf") ))
sh.WorkingDirectory = File.DirApp
sh.Run(10000)
' the array params: "-jar" _(obvious), "vPDFcCL.jar" _(the jar to call), fn2&"/"&fn1 _(the path and file name of .RTF), fn1.Replace(".rtf",".pdf") _(the output PDF file converted)