63700_fr-FR

liliconcom

Utilisation de RunProgram pour démarrer cmd.exe et exécuter des commandes

Je souhaite utiliser RunProgram pour exécuter un exécutable tel que notepad.exe via cmd.exe.

Ce qui suit renverra le répertoire correct, mais lorsque j'ajoute une autre commande à la liste d'options "notepad.exe", j'obtiens une erreur indiquant que le système ne peut pas trouver le chemin spécifié.

cmd1 = "/k cd /d " || "C:\Windows\System32";
RP = RunProgram(
 Executable( "CMD.EXE"),
 Options( {cmd1} ), 
 ReadFunction("text")
);

J'ai aussi vu cette erreur à quelques reprises et je ne comprends pas bien ce qu'elle dit. Comment peut-on y remédier ?

The external program was producing output when the RunProgram object was destroyed.
Use a JSL variable to hold the RunProgram object.
Optionally, send messages to the variable to manage the object's lifetime.

Re : Utiliser RunProgram pour démarrer cmd.exe et exécuter des commandes

parfait merci.Je n'arrive pas à croire que je n'ai jamais remarqué la liste déroulante d'exemples multiples.

Re : Utiliser RunProgram pour démarrer cmd.exe et exécuter des commandes

Vous devriez regarder l'exemple 3 dans Aide > Index des scripts > Fonctions > Exécuter le programme.

Ci-joint un script écrit pour le chapitre 9 de Compagnon JSL, Applications du langage de script JMP, deuxième édition .Il comprend plusieurs méthodes pour lire plusieurs commandes ; commandes multiples à un programme, ou plusieurs commandes DOS.Voir l'exemple #5 dans ce script pour plusieurs commandes dos (cd, dir, etc.) Les notes de discussion commencent à la ligne 199 et le JSL est aux lignes 253 à 287.

 

Si vous souhaitez simplement prendre des notes, pendant votre session, voici un script simple qui ne nécessite pas d'exécuter le programme.

Names Default to Here(1);

noteslst ={};
InsertInto(noteslst, char(AsDate(Today()))|| " Notes");
InsertInto(noteslst, "Hello, World!");
InsertInto(noteslst,"It's hot here, 99 degrees");
InsertInto(noteslst,"Time to cool off");
InsertInto(noteslst,"Good Bye");

xtxt = Concat Items(noteslst,"\!N");
Save Text File( "c:\temp\July23Notes.txt" , xtxt);