Comment acheminer STDOUT et STDIN vers le programme qbasic

Question

Je voudrais savoir comment diriger correctement STDOUT et STDIN vers un programme qbasic fonctionnant sous DOS 6.22. Je voudrais que mon programme qbasic soit en mesure d'exécuter EEUPDATE.exe via la ligne suivante "EEUPDATEW.exe/NIC = * /FILE=I211.txt/MAC = */INVMUPDATE", puis lit dans le STDOUT posté par EEUPDATE.exe pour un traitement ultérieur. Comment ferais-je cela? Je me suis cogné le cerveau toute la journée et je n'arrive pas à le faire marcher.

Ci-dessous si mon programme simple. En ce moment, il peut simplement saisir l'adresse MAC, plus tard, je vais incrémenter l'adresse MAC en fonction de ce que je reçois de STDOUT.

Answer 1

Voici un exemple de la façon d'utiliser SHELL dans QBasic:

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