Page 2 sur 2

Re: [..] Récupérer des réponses à des commandes telnet

Posté : ven. 01 oct. 2010 16:22
par s4nji
Alors quand un port est en B19 par exemple ça affiche bien "Port:B19", par contre un port du type "19" ça écrit "Port:" et c'est vide après "Port:". Il doit y avoir une nuance quelque part !

:o

Re: [..] Récupérer des réponses à des commandes telnet

Posté : ven. 01 oct. 2010 17:16
par Jerome
Coucou

Code : Tout sélectionner

If $result = 1 Then 
 $array = StringRegExp($expectOutBuffer, 'Located on Port : ([A-Z][0-48]+)', 1)
 $array2 = StringRegExp($expectOutBuffer, 'Located on Port : ([0-48]+)', 1)
If Ubound($array) <> 0 Then
      If  Ubound($array) <> "" Then
            MsgBox(4096,"Resultat", "Port:"&$array[0]& @CRLF)
      Else
            MsgBox(4096,"Resultat", "Port:"&$array2[0]& @CRLF)
Else
      ConsoleWrite("No port found."& @CRLF)
EndIf


Jérôme

Re: [..] Récupérer des réponses à des commandes telnet

Posté : ven. 01 oct. 2010 18:09
par Manwe
Juste un

Code : Tout sélectionner

$array = StringRegExp($text, 'Located on Port :[ ]*([A-Z]?[0-9]+)', 1)
dans mon code initial.

l'aide de stringregexp te donne
* Repeat the previous character, set or group 0 or more times. Equivalent to {0,}
+ Repeat the previous character, set or group 1 or more times. Equivalent to {1,}
? The previous character, set or group may or may not appear. Equivalent to {0, 1}

Ca permet de gerer
s'il y a un espace ou pas.
le fait de n'avoir qu'une seule lettre en majuscule ou pas.
d'avoir forcement un entier de 0 à 99999999999......

Sinon le script teraTerm c'est un peu basique. C'est ce que j'utilisais avant.

Re: [..] Récupérer des réponses à des commandes telnet

Posté : mar. 05 oct. 2010 12:46
par s4nji
merci les amis ça marche impec.

Je vais faire évoluer un peu le script, j'aurai sûrement d'autres questions.

Biz