sms(letsads)+delphi

[monakhov]

ДВС, камрады. есть тема отправить смс (Украина, в основном МТС) посредством API сайта letsads.

есть хостинг с БД из которой нужно вытянуть, вставить в текст смс и отправить (ежедневно) автоматически/автоматизированно.

по API - http://letsads.com/sms-api

в PHP вопрос решился за 2-3 минуты, с дельфой не соображу, как бы его прикрутить.

если низзя - можт посоветуете альтернативный вариант.
Премногоблагодарен!

[raxp]

http://programmersforum.ru/showthread.php?t=186360
http://parsing-and-i.blogspot.com/20...ml-delphi.html

[monakhov]

Спасибо, raxp!
Если кому надо:

xmlParams:=TFileStream.Create('d:\1.xml', fmOpenRead or fmShareDenyWrite);
      try
        IdHTTP1.Request.ContentType:='text/xml';
        sResponse:=IdHTTP1.Post('http://letsads.com/api', xmlParams);
        ShowMessage(sResponse);
      except
        on E: Exception do ShowMessage('Error encountered during POST: ' + E.Message);
      end;
      xmlParams.Free;
    end;

Есстесна перед этим сформировать XML)