Подскажыте как сделать чтоб содержимое файла txt отправлялось по HTTP POST

[smail2133]

Привет Всем !! У меня проблема с отправкой HTTP POST.
Как сделать чтоб содержымое файла txt отправлялось на сервак при помощи idhttp ???
Подскажите плис очень надо вот моя ася 477080587

[Скотти]

http://tinyurl.com/yafr4jf

[POS_troi]

Читаеш файл в буфер и отправляешь буфер куда нужно

[smail2133]

Читаеш файл в буфер и отправляешь буфер куда нужно
Можно кодом ?

[imreadyourmind]

вот тебе код отправки первой строчки файла

var rev,str:string;
ss: TStringStream;
s :ANSIstring;
f:textfile;
begin

assignfile(f,getcurrentdir+'/txtfile.txt);
reset(f);
readln(f,str);
closefile(f);

ss := TStringStream.Create('');
s :=str;
ss.WriteString('txt='+s);

http1:=TIdHTTP.Create(nil);
rev:=http1.Post('http://vkontakte.ru/wall.php', ss);
http1.Free;

[1n0y]

var
file:tstringlist;
begin
blabla
file:=tstringlist.create;
file.loadfromfile(123.txt);
http1.Post('http://vkontakte.ru/wall.php', file);

както так (:

[M_script_]

както так (:
Так точно не получится

[noxjoker]

Читаеш файл в буфер и отправляешь буфер куда нужно

Очень логично в буфер.

[M_script_]

TIdMultiPartFormDataStream *multi = new TIdMultiPartFormDataStream;
TIdHTTP *http = new TIdHTTP(NULL);
multi->AddFile("file", filename, "text/html");
http->Post(site, multi);

[imreadyourmind]

Ему походу уже ниче не надо))

[smail2133]

Все сделал !! Очень спасибо Кто помог