Utilisation de MSHTML : probleme de couleur de police

Signaler
Messages postés
15
Date d'inscription
lundi 22 janvier 2007
Statut
Membre
Dernière intervention
7 avril 2021
-
Bonjour,

J'ai fabriqué un robot qui lit et écrit dans une fenêtre d'un visiochat webcamfrog. Ce visiochat utilise des fenêtres de classe Internet Explorer_Server et le seul moyen que j'ai trouvé pour lire et écrire est de passer par MSHTML, dont j'ai trouvé des routines je sais plus où.
Pour lire j'utilise ceci :
Set htmlDoc = IEDOMFromhWnd (HandleFenetreLectureSalon)
thetext = htmlDoc.body.innerText

et pour écrire ceci :
Set htmlDoc = IEDOMFromhWnd(HandlefenetreSaisietexte)
htmlDoc.body.innerText = textmsg
Call SendMessageLong(HBoutonEnvoi, WM_LBUTTONDOWN, 0&, 0&)
Call SendMessageLong(HBoutonEnvoi, WM_LBUTTONUP, 0&, 0&)
où HBoutonEnvoi est le handle du bouton "Envoi" situé au bout de la zone de saisie de texte et HandlefentreSaisietexte celui de la fenetre dans la quelle il faut écrire le texte à envoyer (lol)
Ca marche très bien, seulement le texte est émis dans la couleur et la police par défaut. Je n'ai pas trouvé les propriétés de MSHTML à utiliser pour spécifier au moins la couleur du texte, voire la police.

Quelqu'un pourrait-il m'aider ?
merci d'avance !!

Vbasiquement vôtre ...
Eric


End If