Привет Всем !! У меня проблема с отправкой HTTP POST. Как сделать чтоб содержымое файла txt отправлялось на сервак при помощи idhttp ??? Подскажите плис очень надо вот моя ася 477080587
вот тебе код отправки первой строчки файла Code: 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;
Code: var file:tstringlist; begin blabla file:=tstringlist.create; file.loadfromfile(123.txt); http1.Post('http://vkontakte.ru/wall.php', file); както так
PHP: TIdMultiPartFormDataStream *multi = new TIdMultiPartFormDataStream; TIdHTTP *http = new TIdHTTP(NULL); multi->AddFile("file", filename, "text/html"); http->Post(site, multi);