Page 1 sur 1

récuperer lignes terminal

Publié : jeu. 17/sept./2009 22:12
par venom
Bonjour,

voilà tout est dans le titre je cherche le moyen de récupérer des informations que sort le terminal.

il me semble que j'avais déjà posé ce genre de question mais sous windows et DOS :) mais plus moyen de remettre la main dessus 8O

bref si quel qu'un sais sa serait sympa de sa part :P
merci






@++

Re: récuperer lignes terminal

Publié : ven. 18/sept./2009 16:23
par Anonyme
Jamais réussi à lire le terminal , par contre , tu peut lançer des commandes shell via runprogram()
et recupérer le contenu

exemple avec lsusb :

Code : Tout sélectionner

ProgramToRun$  = "lsusb"
Parameters$    = ""

CmdID = RunProgram(ProgramToRun$,"","./",#PB_Program_Open |  #PB_Program_Read  )
If IsProgram(CmdID)
	While ProgramRunning(CmdID)
		Sortie$ + ReadProgramString(CmdID) + Chr(13)
	Wend 
EndIf 


MessageRequester("lsusb", Sortie$)

Re: récuperer lignes terminal

Publié : ven. 18/sept./2009 16:58
par venom
Merci Cpl.Bator,

le problme c'est que j'aurais souhaité récupérer la commande ps -A
mais avec ton code sa ne fonctionne pas dommage. je continue a chercher merci.





@++

Re: récuperer lignes terminal

Publié : ven. 18/sept./2009 17:15
par Anonyme
Bah si ^^
suffit de passer un paramètre "-A" , avec runprogram() pas de soucis :

Code : Tout sélectionner

ProgramToRun$  = "ps" 
Parameters$    = "-A" 
CmdID = RunProgram(ProgramToRun$,Parameters$,"./",#PB_Program_Open |  #PB_Program_Read  ) 
If IsProgram(CmdID) 
  While ProgramRunning(CmdID) 
    Sortie$ + ReadProgramString(CmdID) + Chr(13) 
  Wend  
EndIf  
 
MessageRequester("lsusb", Sortie$)

Re: récuperer lignes terminal

Publié : ven. 18/sept./2009 17:16
par venom
:oops: je venais de voir mon erreur
mais tu as été trop vite :lol: :wink:
merci





@++