megaspring
Newbie | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору Необходимо настроить отправку sms из приложения, написанного на Delphi, с помощью MTS Communicator API. В приложении есть компонент THTTPRIO, в нем, в свойстве WSDLLocation, прописана ссылка на wsdl-описания сервисов отправки sms (https://www.mcommunicator.ru/m2m/m2m_api.asmx?WSDL). Сама wsdl выгружена, сохранена и добавлена в проект приложения. Отправка sms осуществляется следующим образом: Код: procedure TForm1.Button1Click(Sender: TObject); var mc: MTS_x0020_Communicator_x0020_M2M_x0020_XML_x0020_APISoap; res: Int64; MD5: TIdHashMessageDigest5; begin MD5:=TIdHashMessageDigest5.Create; mc:=GetMTS_x0020_Communicator_x0020_M2M_x0020_XML_x0020_APISoap(true, 'https://www.mcommunicator.ru/m2m/m2m_api.asmx?WSDL', HTTPRIO1); try mc.SendMessage(Edit1.Text, Edit2.Text, Edit3.Text, Edit4.Text, MD5.HashStringAsHex(Edit5.Text)); except on e: Exception do Application.MessageBox(PChar('Ошибка отправки sms-сообщения:'+#13+e.Message), PChar(Application.Title), MB_OK or MB_ICONERROR); end; MD5.Destroy; end; | где: Edit1.Text - номер получателя вида 7хххххххххх; Edit2.Text - текст сообщения; Edit3.Text - номер отправителя вида 7хххххххххх; Edit4.Text - логин; Edit5.Text - пароль. При любых значениях номеров отправителя, получателя, текста сообщения, логина или пароля получаю одну и ту же ошибку: MSID_FORMAT_ERROR (Формат MSID неверен). Может кто сталкивался с Delphi и MTS Communicator M2M XML API? Помогите разобраться. |