Трабла с авторизацией

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by Axeee, 20 Dec 2014.

  1. Axeee

    Axeee Elder - Старейшина

    Joined:
    26 Nov 2008
    Messages:
    286
    Likes Received:
    15
    Reputations:
    0
    Подскажите в чем косяк ?
    Выскакивает эта ошибка:
    [​IMG]
    Сам код:
    PHP:
    procedure TForm1.Button1Click(SenderTObject);
    var
    LoginDataResponseTStrings;
    error_textstring;
    begin
    LoginData 
    := TStringList.Create;
    Response := TStringList.Create;
    try
      
    LoginData.Add('username=' +Edit1.Text);
      
    LoginData.Add('password=' +Edit2.Text);
      
    LoginData.Add('next=/app/profile');
      
    Response.Text := IdHTTP1.Post('https://сайт.ru/login/'LoginData);
      
    Memo1.Lines.Add(Response.Text);
      if 
    pos('/logout'Response.Text)>0 then
      begin
        Memo1
    .Lines.Add('Успешно блять!');
      
    end
      
    else
      
    begin
        Memo1
    .Lines.Add('Хуй блять!: ' error_text);
    end;
    except
      Memo1
    .Lines.Add('Ошибанка в програмке блять');
     
    end;
      
    end;
    end.

     
    #1 Axeee, 20 Dec 2014
    Last edited: 20 Dec 2014
  2. M_script

    M_script Members of Antichat

    Joined:
    4 Nov 2004
    Messages:
    2,581
    Likes Received:
    1,317
    Reputations:
    1,557
    IdSSLIOHandlerSocketOpenSSL
     
  3. Axeee

    Axeee Elder - Старейшина

    Joined:
    26 Nov 2008
    Messages:
    286
    Likes Received:
    15
    Reputations:
    0
    добавил и в идхттп указал иондлере, всеравно не получается авторизоваться.. но зато ошибка не появляется теперь.