Recherche d'une variable dans un texte et la recuperer

Soyez le premier à donner votre avis sur cette source.

Snippet vu 7 229 fois - Téléchargée 39 fois

Contenu du snippet

Permet de rechercher une variable dans un texte
tout est décrit dans la sources

Source / Exemple :


Public Function Recherche(Texte As String, Expression_debut As String, Expression_fin As String) As String
Dim Variable, Valeur
Valeur = Split(Texte, Expression_debut)
Variable = Split(Valeur(1), Expression_fin)
Recherche = Variable(0)
End Function

'EXEMPLE
'pour appeler la fonction

Private Sub Form_Load()
Dim ligne As String
ligne = "[test=toto]"
Form1.Caption = Recherche(ligne, "[test=", "]")
End Sub

Conclusion :


La fonction retourne toto car il est entre "[test=" et "]"

A voir également

Ajouter un commentaire

Commentaires

cs_Arnaud
Messages postés
33
Date d'inscription
dimanche 11 mars 2001
Statut
Membre
Dernière intervention
11 juillet 2002

je ne programme plus en vb depuis presque 3ans donc je n'est pas beaucoup le temps de me pencher sur une solution
mais tu peux envoyer ligne par ligne.
ou rassemble les lignes en une seul
ce n'est pas tres propre mais sa devrait fonctionner.

Desoler de ne pouvoir t'avancer plus contact moi si sa te pose de gros probleme

Arnaud
WhiteDwarf
Messages postés
510
Date d'inscription
samedi 29 décembre 2001
Statut
Membre
Dernière intervention
23 mai 2008

Ca ne marche pas lorsqu'il il ya plusieures lignes, aurais tu une solution ?
cs_Pof
Messages postés
78
Date d'inscription
lundi 11 février 2002
Statut
Membre
Dernière intervention
7 février 2006

pratique par exemple pour recuperer des liens dans une page en html ^^

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.