Bonjour à toutes et tous,

Aujourd'hui ayant le cerveau en compote j'ai du mal à simuler un post sur une page web. Le but est de récupérrer des informations contenue dans la page web affichée après l'authentification.

Voici le code que j'utilise :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
var
  TsX : TStringList;
begin
      TsX := TStringList.Create;
      TsX.Add('id=frmLog');
      TsX.Add('md5sum='+edit9.Text);
      TsX.Add('login='+edit6.Text);
      TsX.Add('password='+edit8.Text);
      TsX.Add('code='+edit7.Text);
      IdHTTP1.Request.From := 'frmLog';
      IdHttp1.Request.ContentType := 'application/x-www-form-urlencoded';
      listbox1.Items.Text := IdHTTP1.Post('http://www.url.com/login.pl',TsX);
      TsX.Free;
 end;
La page web est :

Code html : Sélectionner tout - Visualiser dans une fenêtre à part
<FORM action="login" method="post" onSubmit="return connect(this)" id="frmLog">    <input type="hidden" name="md5sum" value="7bca41fd61049dfdec8165f2d6376323">    <TD><input type="text" name="login" class="input" size="18"></TD>    <TD><input type="password" name="password" class="input" size="12"></TD>    <TD><img src="captcha/7bca41fd61049dfdec8165f2d6376323.png" width="95" height="23"></TD>    <TD><input type="text" name="code" class="input" style="height:20" size="8" maxlength="6"></TD>    <TD><input type="image" src="images/ok.png" border="0"></TD> </FORM>

J'ai viré les éléments inutiles de mon code et de la page web.... d'ou certaines incohérence sur le code html (des TD mais pas de table, etc ...).

Merci d'avance pour vos proposition.

Icb3@