Méthode pour simuler un clique sur un bouton d'une page HTML (Tcppwebbrowser)

Bonjour,

Connaissez vous une méthode afin de pouvoir simuler un clique sur un bouton d'une page HTML en utilisant le composant "tcppwebbrowser".

Par exemple sur un forum, je voudrais utiliser la page recherché.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

Variant vDocument = WebBrowser->ControlInterface->Document; if (((IDispatch *)vDocument) != NULL) { Variant vForms = vDocument.OlePropertyGet("Forms"); Variant vForm = vForms.OleFunction("item",0,0); Variant vContent = vForm.OlePropertyGet("All"); Variant vSearchField = vContent.OleFunction("NamedItem","search"); //Je cherche le champ recherché vSearchField.OlePropertySet("Value","Le mot-clé à recherché"); // Je rentre le mot-clé que je veux recherché ?? // Fonction permettant de simuler un clique sur un bouton   }

---

Merci d'avance

Regarde autour de GetElementById, cela te renvoi une interface vers l'éléments, tu as théorique un IHTMLElement que tu peux caster IHTMLInputElement (voir MSHTML.hpp)
Si la Propriété Type est égale à "button", tu peux invoquer la méthode "click"
En Delphi, cela se fait automatiquement avec le LateBiding des OleVariant
En C++Builder, je suppose que OleFunction devrait permettre d'y parvenir

Click correspond au OnClick du JavaScript
Sinon, il faut récupérer la propriété Form qui est un IHTMLFormElement qui possède une méthode submit !

Citation:

---

Envoyé par ShaiLeTroll

Regarde autour de GetElementById, cela te renvoi une interface vers l'éléments, tu as théorique un IHTMLElement que tu peux caster IHTMLInputElement (voir MSHTML.hpp)
Si la Propriété Type est égale à "button", tu peux invoquer la méthode "click"
En Delphi, cela se fait automatiquement avec le LateBiding des OleVariant
En C++Builder, je suppose que OleFunction devrait permettre d'y parvenir

Click correspond au OnClick du JavaScript
Sinon, il faut récupérer la propriété Form qui est un IHTMLFormElement qui possède une méthode submit !

---

Merci pour ta réponse,
Je vois pas comment faire :)
Pour la méthode avec "submit" j'ai essayé avec le code que j'ai mis au début, il me met bien la valeur dans les champs mais ça me rafraichis la page.

Code:

---

1 2 3 4 5 6 7 8 9 10

Variant vDocument = WebBrowser->ControlInterface->Document; if (((IDispatch *)vDocument) != NULL) { Variant vForms = vDocument.OlePropertyGet("Forms"); Variant vForm = vForms.OleFunction("item",0,0); Variant vContent = vForm.OlePropertyGet("All"); Variant vSearchField = vContent.OleFunction("NamedItem","search"); //Je cherche le champ recherché vSearchField.OlePropertySet("Value","Le mot-clé à recherché"); // Je rentre le mot-clé que je veux recherché vForm.OleProcedure("Submit"); }

---

Variant vForms = vDocument.OlePropertyGet("All");
Variant vBouton = vForms.OleFunction("NamedItem",WideString("nom du bouton").c_bstr());
if (vBouton.VUnknown == NULL)
{
ShowMessage ("Problème avec le nom du bouton!");
return;
}
vBouton.OleFunction("click");

:tagcode:
Merci pour l'extrait de code qui traduisait mes propos sur l'utilisation en Late Binding des OleVariant, il est juste 7 mois en retard :aie: