Discussion :

[DevBel]

salut

je cherche à afficher une page internet sache qu'il faut saisir le NOM et Mot de passe.
comment faire pour automatisé la saisie ??

merçi

[DevBel]

héhooo.

Aidez moi svp.

je suis débutant et jsé pas comment faire.

je ve une réponseeeeee

[Paul TOTH]

ben...faut donner le nom et le mot de passe

[DevBel]

j'ai essayé avec le composant IdHttp.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
{----------------------------------------------------------------}
procedure TForm1.Button1Click(Sender: TObject);
var
  Ts : TStringList;
  Fs : TFileStream;
begin
 
  Ts := TStringList.Create;
  Fs := TFileStream.Create('c:\test.txt',fmCreate);
 
  try
   If idhttp1.connected then
    begin
      Ts.Add('TxtUserName=****');
      Ts.Add('TxtPassword=***');
     Ts.Add('__VIEWSTATE='+LView);  // Lview et une variable string.
      idhttp1.AllowCookies:=true;
      IdHttp1.Request.ContentType := 'application/x-www-form-urlencoded';
      IdHTTP1.Post('http://212.100.209.7/security/Login.aspx?culture=ar', Ts, TStream(fs));
 
    end;
 
 finally
    Ts.free;
 end;
 
end;
{---------------------------------------------------------------------}

mais le site affect la valeur de UserName et pas du password.

J'ai rien comprie

[milaybe]

Tu n' as qu'à utiliser le package intraweb, ce dernier possède tous les composants identiques à des VCL, mais pour le Web

[Paul TOTH]

IntraWeb c'est pour faire un SERVEUR Web, pas pour effectuer la requête

comment détermines-tu la valeur de ___VIEWSTATE ?

et peut-être a-t-il également besoin de "BtnLogin=ادخل"