VISUAL如何获得Runprogram的退出代码

Question

当错误发生时，我使用Runprogram wait "command plus args" wich启动一个DOS程序，当一切按预期工作时，启动0.

问题是我抓不到出口代码。

• 我试过使用ShellExecuteA，但是dataflex不会等待它关闭。
• 我也尝试使用Chain Wait，没有任何可能的结果。

我正在使用VDF 18.2我的应用程序是一个桌面应用程序。

Answer 1

我终于找到了一个很有魅力的答案。DataFlex似乎有一个名为strmark的“神奇变量”，每当我发出命令Runprogram Wait ('program') ('args')时，这个变量就会被清理和填充。

最后，我们可以做这样的事情：

Runprogram Wait ('program.exe') ('my args')
If strmark Showln ('Well, we have an error my friend... Exit code: ' + strmark )
Else ...

当程序本身有问题时，或者即使用户关闭了命令提示符窗口，这就像一种魅力。