Bon je vous expose mon probleme, j'utilise le script qui permet de récupérer des infos de n'importe quelle page en html mais j'ai un probleme: je voudrai faire disparaitre TOUTES les balises ( cad ce qui commence par < et fini par > et ce qui a dedans évidemment) de ce que j'obtient: une fonction fait ça mais uniquement pour la premiere balise rencontrée:


Private Function TrimHTML(str)
pos_deb = InStr(1, str, "<")
Do Until pos_deb = 0
pos_fin = InStr(pos_deb, str, ">")
part_d = Mid(str, 1, pos_deb - 1)
part_f = Mid(str, pos_fin + 1, Len(str) - pos_fin)
str = part_d & part_f
pos_deb = InStr(1, str1, "<")
Loop
TrimHTML = str
End Function

vous ne sauriez pas ce que je dois modifier?

et mon 2eme probleme c'est que j'utilise une fct pour rempacer les é et les à en html par les vrai:

Private Function TrimHTML(str)
Dim regEx,i,j
Set regEx = New RegExp
regEx.IgnoreCase = True
regEx.Global = True

regEx.Pattern = "& agrave;"
str = regEx.Replace(str, "à")
regEx.Pattern = "& eacute;"
str = regEx.Replace(str, "é")
TrimHTML = str
End Function

mais que si j'utilise cette fonction la premiere ne fonctionne pas du tout (enleve mm pas la premiere balise) donc je voudrai faire la mm fonction mais en compatible avec la 1ere si c'est possible...
Avis aux connaisseurs, merci d'avance , @++

Voilà ma fonction (elle fait les balises et les &eacute; et &agrave;)

Au passage, j'ai renommé la fonction TrimHTML en HtmlToText comme tu peux le voir

EDIT : petit problème corrigé...

Merci bcp bcp pour cette réponse trés rapide...

Je viens de taper la fonction, je l'ai testé donc normalement c'est bon mais si ça ne marche pas comme prévu, préviens moi

EDIT : en fait j'ai déjà corrigé un petit bug, regarde à mon post précédent pour le nouveau code.

Nouvelle modification, reprends le nouveau code

eu j'ai un probleme lol, le script ne supprime pas les balise..., <[a-z]+[ /]*> représente toutes les balises possibles ou c'est un exemple?

edit:Avec la correction c nikel merci bcp (t'as fais aussi une petite erreur pour remplacer les é mais j'ai trouvé facile)

Prends le nouveau il a été modifié

"<[/a-z]+[^>]*>" est une expression régulière destinée à virer toutes les balises...

Voila j'ai fini ma config j'ai réussi a mettre ca:
http://www.scoops.be/home.asp?lang=1&conte...pl&searchtext=1

sur mon bureau (c'est les horaires de mon cine)
avec une petite adaptation ma config devrait fonctionner avec tout les cinemas dispos sur www.scoops.be (bcp de cinemas belges) si ça interresse quelqu'un j'envoie mes scripts et la config...

Au fait skoua mon erreur avec les é :-? Paske je ne vois rien

Bah t'as corrigé en fait, t'avais mis HtmlToText a la place de HtmlStr et t'avais oublié HtmlToText = HtmlStr ca je l'avais reperé malgres ma nullité en script lol, en fait je compare différents trucs et je comprend plus ou moins comment ça va...

edit: et voici mon bureau (pas fini le cine je v le remodeler)
edit: voila il est tout beau

J'ai modifié cela mais ça n'était en aucun cas une erreur... le contenu était directement affecté au résultat de la fonction sans passer par la variable HtmlStr

Pour exposer ton bureau, rends-toi ici : http://customxp.net/modules/ipboard/...?showtopic=959