Форум: "Сети";
Текущий архив: 2009.02.22;
Скачать: [xml.tar.bz2];
Внизотправить картинку на radikal.ru (INDY) Найти похожие ветки
← →
Venkin (2008-01-02 16:21) [0]подскажите как отправить картинку на radikal.ru с помощью Indy (Tidhttp)?
делаю:procedure TForm1.Button1Click(Sender: TObject);
var sl: Tstrings;
begin
sl := TStringList.Create;
idhttp1.HandleRedirects := true;
idhttp1.Disconnect;
browser.Silent := true;
sl.Add("test111=vvv");
sl.Add("upload=yes");
sl.Add("JQ=85");
sl.Add("F="C:\Image.jpg"");
sl.Add("CP=yes");
sl.Add("VE=yes");
sl.Add("VM=180");
sl.Add("Submit=1"); // тут чего писать?
try
memo1.Text := idhttp1.Post("http://www.radikal.ru/action.aspx", sl);
finally
sl.Free;
end;
end;
в ответ получаю: "Ошибка. Отсутствует файл"
файл точно есть на винте..
← →
MetalFan © (2008-01-02 19:03) [1]ну так файл то не отсылаешь...
> browser.Silent := true;
а это нафиг???
используй вместо TStringList TIdMultipartFormData
Страницы: 1 вся ветка
Форум: "Сети";
Текущий архив: 2009.02.22;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.005 c