VPF::залить файл на rghost.ru и потом скачать

Akella

Дата 29.9.2011, 13:21 (ссылка)

(нет голосов)

Загрузка ...

Творец

Профиль
Группа: Модератор
Сообщений: 18485
Регистрация: 14.5.2003
Где: Корусант

Репутация: 4
Всего: 329

Подскажите, как правильно заливать файл на rghost.ru? И чтобы потом получить ссылку на скачивание.
Какие поля и чем заполнять.

Вот мой код:

Код


procedure TForm11.Button3Click(Sender: TObject);
Var
 formData: TIdMultiPartFormDataStream;
 FileName, id_in_mls: string;
 idHttp: TidHttp;
begin
  try
    idHttp := TidHttp.Create(application);
    idHttp.AllowCookies := true;
    idHttp.HandleRedirects := true;


    idHttp.Get('http://rghost.ru/');

    formData := TIdMultiPartFormDataStream.Create;

    FileName := 'D:\Pictures\front_side_r.png';


// не мог понять какие поля странички чем заполнять

    formData.AddFile('file', fileName, 'application/octet-stream');

//    formData.AddFormField('choise', 'photo', 'UTF8');

    Memo1.Text := IdHTTP.Post('http://rghost.ru/', formData);

  finally
    FreeAndNil(formData);
    FreeAndNil(idHttp);
  end;
end;

Получаю исключение HTTP 1.1/404 not found

Как вообще понять из исходника страницы, какие поля и чем заполнять?

Proxin

Дата 29.9.2011, 15:45 (ссылка)

(нет голосов)

Загрузка ...

Опытный

Профиль
Группа: Участник
Сообщений: 363
Регистрация: 21.6.2008

Репутация: 1
Всего: 3

зачем такие жуткие извращения? попробуйте посмотреть последовательность пересылки в перехватчике любом (для мозиллы, например - тампердата), а потом воспроизведите эту последовательность с помощью idhttp.

0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема \| Delphi: Сети \| Следующая тема »