OVH Cloud OVH Cloud

Suppression des saut de lignes

1 réponse
Avatar
Guy
Bonjour à tous,
Voilà je recupere dans OUTLOOK les information de :
Ol_Items.HTMLBody

et je supprime les lignes indésirables par la Fonction REPLACE

HTMLBody01 = Replace(Ol_Items.HTMLBody, "<!DOCTYPE HTML PUBLIC ""-//W3C//DTD
HTML 3.2//EN"">", "")

Comment supprimer les lignes blanches, j'ai essayer :
HTMLBody22 = Replace(HTMLBody21, "chr(13) & chr(10)", "") mais cela ne
fonctionne pas.

Aidez-moi
--
Amicalement et merci

1 réponse

Avatar
Eric
Bonjour,

Et avec:
HTMLBody22 = Replace(HTMLBody21, chr(13) & chr(10), "")
ou encore
HTMLBody22 = Replace(HTMLBody21, vbCrLf, "")

?

Bonjour à tous,
Voilà je recupere dans OUTLOOK les information de :
Ol_Items.HTMLBody

et je supprime les lignes indésirables par la Fonction REPLACE

HTMLBody01 = Replace(Ol_Items.HTMLBody, "<!DOCTYPE HTML PUBLIC ""-//W3C//DTD
HTML 3.2//EN"">", "")

Comment supprimer les lignes blanches, j'ai essayer :
HTMLBody22 = Replace(HTMLBody21, "chr(13) & chr(10)", "") mais cela ne
fonctionne pas.

Aidez-moi


--
A+
Eric
http://www.mpfa.info/
Archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr