Как программно отправить SMS?

SMS собой представляет письмо E-Mail, надо просто отправить это письмо на гейт оператора мобильной связи, проблема может быть в том, что оператор не всегда позволяет делать такое да и надо знать формат сообщений и сервер оператора.
Вот например, чтобы послать SMS в Киевстаре (украинский оператор) надо послать E-Mail по такому адресу: [email protected]. где ХХХ-ХХ-ХХ - номер телефона.

Спасибо. Полезная информация.

Для контрактников Киевстара оуончания адреса:
@sms.kyivstar.net
а для ACE&BASE^
@2sms.kyivstar.net

Для umc:
@sms.umc.com.ua

И плюс в начале адреса вводить не надо. Кстати, СМС - это не почтовое сообщение, просто есть у некоторых (не у всех!) операторов сервис такой - мэил-шлюз. У других же операторов (например, DCC - тоже украинский оператор) есть возможность отправлять только с сайта. Соотвественно, для таких операторов надо лезть на сайт, глядеть имя файла скрипта, отловить параметры, а потом из своей проги не сайт открывать, а скрытно так запускать скрипт с нужными параметрами.
Но есть ещё один скрытый прикол. СМСки через разные шлюзы идут с разной скоростью =) Например, я слал себе на "Киевстаровский" номер с сайта - несколько дней (!) шло, параллельно послал через мэил-шлюз - 5 минут! Так что, лучше либо дублировать, либо (что ещё лучше) спрашивать пользователя, какой шлюз он желает юзать.

Цитата(Shuricksoft @ 2.5.2003, 14:33)

Но есть ещё один скрытый прикол. СМСки через разные шлюзы идут с разной скоростью =) Например, я слал себе на "Киевстаровский" номер с сайта - несколько дней (!) шло, параллельно послал через мэил-шлюз - 5 минут! Так что, лучше либо дублировать, либо (что ещё лучше) спрашивать пользователя, какой шлюз он желает юзать.

А вот это не факт. У меня был тот же эксперимент (но не одновременно, а в разные дни), и с сайта могло сообщение шло за 30 сек - 5 мин, а через шлюз - могло вообще не дойти. Тот же Киевстар, покрытие сетью 100%.

Обычно каждый оператор распространяет маленькие буклетики, где подробно описывается, как и в каком формате требуется отправить сообщение.

Цитата

Обычно каждый оператор распространяет маленькие буклетики, где подробно описывается, как и в каком формате требуется отправить сообщение.

Фигли, оператор подробно описывает, какой он хороший, какие классные у него цены и какой он надёжный.

Timon

Мне известны трм способа отправить смс с компьтера:
1. Используя хттп, через сервис опсоса. (GET/POST) на мой взгляд этот метод наиболее предпочтительный. Требуется только наличие интернета.
2. Через почтовик (уже об этом говорили). Сложность в том, что надо дергать свой почтовик или писать свой.
3. Через другой сотовый телефон подключенный к компу. Это конечно супер, надо только знать как подключить телефон (в нете много инфы USB, RS232) ну и, собственно, протокол обмена. Не нужен интернет, но надо платить (единственный и большой минус).
На последок, чтоб не быть голословным.
Моя прога отправляет смс через шлюз опсоса. Справедливо в области действия "Горизонт-РТ"
(у других должно быть так же):

Код

unit Unit1; interface uses  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,  Dialogs, StdCtrls, IdBaseComponent, IdComponent, IdTCPConnection,  IdTCPClient, IdHTTP; type  TForm1 = class(TForm)    IdHTTP: TIdHTTP;    Button1: TButton;    Memo1: TMemo;    Edit1: TEdit;    Edit2: TEdit;    procedure Button1Click(Sender: TObject);  private    { Private declarations }  public    { Public declarations }  end; function SendSMS(AidHTTP:TidHTTP;ProxyPort:integer;ProxiAddrr:string;const Tel,SMSTxt:string):string; var  Form1: TForm1; implementation {$R *.dfm} function SendSMS(AidHTTP:TidHTTP;ProxyPort:integer;ProxiAddrr:string;const Tel,SMSTxt:string):string; var  Request : TStringList;  Response:TStringStream;  URL:string; begin  Result:='nothing';  URL:='http://www.gorizont-rt.ru/cgi-bin/smsgate.exe/submit';  AidHTTP.ProxyParams.ProxyPort:=ProxyPort;  AidHTTP.ProxyParams.ProxyServer:=ProxiAddrr;  AidHTTP.Request.ContentType:='text/html';  Request:=TStringList.Create;  Request.Add('txtAddr=741147'+Tel); // сюда писать то что передаешь  Request.Add('txtSM='+SMSTxt);  Response:=TStringStream.Create('');  try    AidHTTP.Post(URL,Request,Response);    Result:= Response.DataString; // Ответ  except on E:Exception do    Result:='$E '+E.Message;  end;  Request.Free;  Response.Free; end; procedure TForm1.Button1Click(Sender: TObject); begin  Memo1.Lines.Add(SendSMS(idHTTP,3128,'192.168.222.1',Edit1.Text,Edit2.Text)); end; end.

извиняюсь за сырец, этого достаточно чтоб понять суть.

А это халявно? Кто за это СМС платит?
Получатель? Нелогично...
Халява? Смысл операторы в такой услуге...
Отправитель? Каким образом...

Ты платил за смс которые отправлял через сайт? Нет, однозначно. прием смс бесплатный. ВЕЗДЕ.

Разве, что время интернета.

Да. А СМЫСЛ оператору в такой услуге?

Хороший оператор - многосервисный оператор