set WShell = CreateObject("WScript.shell") ACode = WShell.Run("QtCreator_CMakeLists.txt_chcp1252.bat", 0, false)