Italian [B4J] Avviare vbs da programma B4J, passandogli parametro

Process.Start("C:\prog_mio\script.vbs", "COMANDI_ADD");

Dim VbsShell As Shell
VbsShell.Initialize("VbsEvent", "c:\windows\system32\cscript.exe", Array As String("//nologo", "C:\prog_mio\script.vbs", "COMANDI_ADD"))
VbsShell.WorkingDirectory = dir_prog & "\"
VbsShell.Run(12000)

    Dim VbsShell As Shell
    File.WriteString(File.DirData("myapp"), "runme.bat", "c:\windows\system32\cscript.exe C:\prog_mio\script.vbs //nologo  COMANDI_ADD")
    VbsShell.Initialize("VbShell",File.Combine(File.DirData("myapp"), "runme.bat"),Null)
    VbsShell.WorkingDirectory = File.DirData("myapp")
    VbsShell.Run(12000)