Récupérer la sortie d'un programme lancé par EXECUTE_WAIT ?

Traditionnellement on pouvait faire :

Code:: execute_wait "prog.exe | clip"

et on récupérait la sortie dans la variable CLIPBOARD_STRING_PASTE$

mais il semble que ce ne soit plus possible, la barre verticale servant à passer un paramètre au programme.

Y a-t-il une autre méthode ?

Je n'ai pas l(occasion d'essayer pour le moment. Cependant, Google donne ceci:
https://stackoverflow.com/questions/14574170/how-do-i-use-a-pipe-to-redirect-the-output-of-one-command-to-the-input-of-anothe

Il y a, dans ce post, plusieures possiilités. En particulier, la "pipe" de MS-DOS semble appropriée:
program > fichier.txt
puis récupérer le contenu du fichier.

Merci Klaus !

Le PIPE me paraît être une bonne solution, d'autant plus que je l'utilise déjà pour l'instruction EXECUTE de FBCroco. Je pourrais la mettre dans une DLL.

Le but est de lancer FBCroco depuis Panoramic en passant le programme FBCroco dans une chaîne de caractères qui pourrait être générée par Panoramic. C'est ce que j'avais fait avec le langage C.

Essaie ceci :

Code:: execute_wait "cmd.exe | /c dir | clip"

ça fonctionne et tu aura le contenu de la commande DIR dans le CLIPBOARD.

Pour obtenir le contenu de la sortie dans un fichier texte :

Code:: execute_wait "cmd.exe | /c dir > c:\users\microtek\desktop\DirList.txt"

Adapter, bien sur le chemin de la sortie.

Consulter

https://www.malekal.com/liste-commandes-invite-de-commandes-windows/

http://idfixes26.free.fr/Extras_old_time/aide_windows-XP_cmd/aide_cmd_fichiers/redirection.htm

jean_debord a écrit:: Le but est de lancer FBCroco depuis Panoramic en passant le programme FBCroco dans une chaîne de caractères qui pourrait être générée par Panoramic.

Essaie ce code

Code:: dim croco$
croco$ = "D:\Langages\FBcroco\start_fbcroco.exe" : ' adapter le chemin
execute croco$ : ' lancer le programme croco et ...
terminate : ' quitter le programme Pano

EXECUTE, contrairement à EXECUTE_WAIT n'attend pas la fin du programme.
Cette commande lance l'exécution du fichier et SE TERMINE. Elle n'attend pas la fin de l'exécution

Merci papydall. Les deux exemples fonctionnent très bien.

Je suis en train de modifier FBCroco pour qu'il accepte des "crocoscripts" passés sur la ligne de commande.

Exemple pour avoir la factorielle de 1000 :

Code:: fbcroco.exe -p "set_mpfr_prec 10000 : ? fact(1000)"

Le crocoscript pouvant être généré par Panoramic.

Nombre de messages : 12 Date d'inscription : 20/09/2008

Cela fonctionne avec la toute dernière version (0.42) de FBCroco.

Exemple : Calcul d'une grande factorielle et de son approximation par la formule de Stirling :

Code:: dim CROCODIR$
CROCODIR$ = "C:\FBCroco\" : ' Modifier si nécessaire

dim crocoscript$

crocoscript$ = "set_mpfr_prec 75 : print fact(50)"
run_script(crocoscript$)
print "Factorielle de 50 :"
print CLIPBOARD_STRING_PASTE$
print

crocoscript$ = "set_mpfr_prec 75 : dim c!, x! : c = sqr(2 * pi_const) : x = 50 : ? c * x^(x + 0.5) * exp(-x)"
run_script(crocoscript$)
print "Approximation de Stirling :"
print CLIPBOARD_STRING_PASTE$

end

sub run_script(crocoscript$)
execute_wait "cmd.exe | /c " + CROCODIR$ + "fbcroco.exe -p " + chr$(34) + crocoscript$ + chr$(34) + " | clip"
end_sub

Attention toutefois : l'antivirus peut ralentir l'exécution s'il vérifie le programme FBCroco qui est compilé dans le fichier crocoscript.exe

» Récupérer le numéro d'instance d'un programme
» recuperer infos d' un fichier traité par programme externe
» Sortie de Sub intempestive
» fermer le programme qui lance un autre programme
» Sortie d'une procédure