' Satsuma launcher. Starts the converter with no visible window. Option Explicit Dim sh, fso, here, target, src, cmd Set sh = CreateObject("WScript.Shell") Set fso = CreateObject("Scripting.FileSystemObject") If WScript.Arguments.Count < 2 Then WScript.Quit 1 here = fso.GetParentFolderName(WScript.ScriptFullName) target = WScript.Arguments(0) src = WScript.Arguments(1) cmd = "powershell.exe -NoProfile -ExecutionPolicy Bypass -WindowStyle Hidden -File """ & here & "\Convert.ps1"" -Target """ & target & """ -Source """ & src & """" sh.Run cmd, 0, False