dos - 如何将 STDOUT 和 STDIN 传送到 qbasic 程序

Question

我想知道如何正确地将 STDOUT 和 STDIN 传输到在 DOS 6.22 上运行的 qbasic 程序。我希望我的 qbasic 程序能够通过以下行“EEUPDATEW.exe /NIC=* /FILE=I211.txt /MAC=* /INVMUPDATE”运行 EEUPDATE.exe，然后读取 EEUPDATE.exe 发布的 STDOUT用于进一步处理。我该怎么做呢？我整天都在敲打我的大脑，我似乎无法让它工作。

下面是我的简单程序。现在它只能获取 MAC 地址，稍后我将根据从 STDOUT 收到的内容增加 MAC 地址。

Answer 1

以下是如何在 QBasic 中使用 SHELL 的示例：

DECLARE SUB GetFiles (Var$)
REM list files in current directory
C$ = "C:*.*"
CALL GetFiles(C$)
END

SUB GetFiles (Var$)
Var2$ = "dir " + Var$ + " > tempfile.dir"
SHELL Var2$
OPEN "tempfile.dir" FOR INPUT SHARED AS #1
DO UNTIL EOF(1)
    LINE INPUT #1, X$
    PRINT X$
LOOP
END SUB