Remplir formulaire automatique
Bonjour
j'ai trouver dans la faq de c++ builder la procédure pour remplir un formulaire automatique.
je souhaiterais me loguer sur un site automatique .
j'ai donc mis cette procédure dans un timer à 5s ( le temps de charger la page)
cela fonctionne mais ce message d'erreur apparais au bout de 10s.
http://www.garageprestigeauto.com/erreur.jpg
ps : lorsque j’exécute cette procédure à partir d'un bouton , je n'ai pas d'erreur.
mais je souhaiterais le faire automatiquement.
quelqu'un pourrais t'il m'aider
mon code :
Code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
|
__fastcall TForm2::TForm2(TComponent* Owner)
: TForm(Owner)
{
WideString source = Memo1->Lines->Text;
CppWebBrowser1->Navigate(source, 0, 0, 0, 0);
}
void __fastcall TForm2::Timer1Timer(TObject *Sender)
{
Variant vDocument = CppWebBrowser1 ->ControlInterface->Document;
if (((IDispatch *)vDocument) != NULL)
{
Variant vForms = vDocument.OlePropertyGet("Forms");
Variant vForm = vForms.OleFunction("NamedItem","ident");
Variant vContent = vForm.OlePropertyGet("All");
Variant vLoginField = vContent.OleFunction("NamedItem","LOGIN");
Variant vPassField = vContent.OleFunction("NamedItem","PASSWORD");
vLoginField.OlePropertySet("Value","monlogin");
vPassField.OlePropertySet("Value","monpassword");
vForm.OleProcedure("Submit");
}
} |
merci
