B4J Question Call Powershell from b4j

shl.Initialize("shl", "java", _
         Array As String("Powershell -Command Add-Type –AssemblyName System.Speech;(New-Object System.Speech.Synthesis.SpeechSynthesizer).Speak('Good Morning');"))
shl.Run(-1)

Dim js As Shell
    Dim params As List
    params.Initialize
    Dim mystring As String=$"(Add-Type ....your command......)"$
    js.InitializeDoNotHandleQuotes("js", "powershell.exe", Array(mystring))
    js.WorkingDirectory="c:\windows\system32"   
    js.Run(-1)
    Wait for (js) js_ProcessCompleted (Success As Boolean, ExitCode As Int, StdOut As String, StdErr As String)
    'Log(StdOut)

Sub Button1_Click
    Private TextString As String = TextField1.text 'entered in the main form
    fx.Clipboard.SetString(TextString) 'get it to the clipboard
    shl.Initialize("shl","c:\program files\balcon\balcon.exe",Array As String("-c")) 'or any other reasonable path to balcon.exe
    shl.Run(10000) 'plenty of timeout
End Sub


Sub shl_ProcessCompleted (Success As Boolean, ExitCode As Int, StdOut As String, StdErr As String)
    If Success And ExitCode = 0 Then
        Log("Success")
        Log(StdOut)
    Else
        Log("Error: " & StdErr)
    End If
End Sub