Recuperer des balises.

insupien Messages postés 2 Date d'inscription jeudi 30 janvier 2003 Statut Membre Dernière intervention 8 mars 2004 - 6 mars 2004 à 23:48
insupien Messages postés 2 Date d'inscription jeudi 30 janvier 2003 Statut Membre Dernière intervention 8 mars 2004 - 8 mars 2004 à 12:29
Salut tt le monde,

j'ai un texte issu d'un fichier balisé genre:

texte1
Texte21

ce que je voudrais fais c'est retrouver les balises et ce qui est entre elle pour pourvoir executer.

merci d'avance.
insupien

>:)

2 réponses

cs_Jack Messages postés 14006 Date d'inscription samedi 29 décembre 2001 Statut Modérateur Dernière intervention 28 août 2015 79
7 mars 2004 à 02:59
Salut insupien

Utiliser "Instr" pour repérer les > et <
Instr permet de retrouver la position d'un caractère dans une chaine :
Ca t'oblige à faire une boucle de recherche en deux temps :
Pour rechercher l'emplacement du premier ">"
r = Instr(1, MonTexte, ">")
Ensuite, rechercher le "<" qui suit :
t = Instr(r, MonTexte, "<")
Pour reformer le texte entre deux :
Selection = Mid(MonTexte, r + 1, t - r)

Quand tu commenceras le deuxième groupe, tu répete les mêmes instructions, mais, pour la premiere recherche, il faudra remplacer le "1" par "t" :
r = Instr(t, MonTexte, ">")

Vala
Jack
0
insupien Messages postés 2 Date d'inscription jeudi 30 janvier 2003 Statut Membre Dernière intervention 8 mars 2004
8 mars 2004 à 12:29
merci mais lorsqu'il y a deux balises imbriquées ca pose probleme , tu ne croix pas ? ???

>:)
0
Rejoignez-nous