Bonjour,

J'ai toujours du mal avec Les fonctions de chaînes de caractères en vbs.

en effet je voudrais récupérer la phrase à partir du mot "sur" je dois avoir le phrase "Mon Ordinateur Perso"

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Laligne  = "Envoi d'une requˆte 'ping' sur Mon Ordinateur Perso"
 
	Function RetourMot(strIPInfo,i)
	Dim arrIPInfo
	If InStr(strIPInfo, "sur") > 0 Then
		arrIPInfo = Split(strIPInfo, "sur")
		If UBound(arrIPInfo) >= 1 Then
				If i > 1 Then 
					'Msgbox "Erreur code i"
					RetourMot = "Erreur code i"
					Exit Function
				end if
			RetourMot = arrIPInfo(i)
			End If
	        End If
       End if
 
 call RetourMot(Laligne,0)
j'ai re resultat "Envoi d'une requˆte 'ping'"

Je ne trouve pas comment recupérer les mot après le mot " sur " !!

Je vous remercie d'avance !!