Пример запуска:
c:\smspilot\sms.exe send="Скидка 20%" to="79087964781" from="myshop.ru" apikey="ABCDEFGH...."
Параметр | Наличие | Описание |
---|---|---|
Без параметров | выводится краткая справка | |
send="TEXT" | обязательный | текст SMS сообщения |
to="NUMBER(S)" | обязательный | номер телефона в международном формате (для России должн начинаться с 7), или несколько номеров перечисленных через запятую |
from="SENDER_ID" | опциональный | Подмена номера отправителя |
apikey="APIKEY" | обязательный | значение API-ключа доступка к шлюзу SMS Пилот |
proxy="user:pass@ip:port" | опциональный | настройки прокси, в формате логин:пароль@хост:порт, порт по умолчанию 8080, можно указать только хост:порт (без авторизации) |
КомСтрока = "c:\sms\sms.exe";
КомСтрока = КомСтрока + " send=""" + "Привет мир!" + """"; //текст сообщения
КомСтрока = КомСтрока + " to=""" + "79131231212,79021231212" + """"; // телефон(ы)
КомСтрока = КомСтрока + " from=""SMSFIRMA"""; // номер телефона или ID отправителя
//КомСтрока = КомСтрока + " proxy=""user:pass@192.169.1.14:8080"""; // настройка прокси
КомСтрока = КомСтрока + " apikey=""КЛЮЧ""";
ЗапуститьПриложение( КомСтрока );
uses
ShellApi;
//
//
procedure TForm1.Button1Click(Sender: TObject);
var
cmd,params: string;
begin
cmd := 'c:\sms\sms.exe';
params := 'send="Привет мир!"'; // текст сообщения
params := params+' to="79131231212,79021231212"'; // телефон(ы)
params := params+' from="SMSFIRMA"'; // Номер отправителя или ID
params := params+' apikey="КЛЮЧ"'; //
// params := params + ' proxy="user:pass@192.169.1.14:8080"'; // прокси
ShellExecute(Self.Handle, 'open', PChar(cmd), PChar(params), nil, SW_SHOWNORMAL);
end;