Показать сообщение отдельно
  #1  
Старый 01.04.2010, 08:04
Timur Timur вне форума
Прохожий
 
Регистрация: 13.05.2008
Сообщения: 10
Репутация: 10
По умолчанию Отправка смс на мобильный номер

Здравствуйте всем,

Очень прошу помочь с одним задачей....
Я отправляю смс сообщение на мобильный телефон.
-----У меня имеется компоненты: Memo1,DbGrid,WebBrowser,edit и button.
--*------Вопрос-------*---
Мне с сотовой компании предоставили url ссылку в виде:
'http://212.6.12.135:1010/s.asp?n='+номер телефона+'&m='+текст сообщения+''
Я шас написал прогу в виде:
Код:
procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
begin
S=('http://212.6.12.135:1010/s.asp?n='+edit1.text+'&m='+memo1.text+'');
WebBrowser1.Navigate(s);
end;
end.
В этом случаи у меня сообщения отправляется на мобильный....
------------ВОПРОС--------------------------
Когда я делаю в цикле у меня не отправляется а отправляет сообщение только на один номер...
Например:
procedure TForm1.Button1Click(Sender: TObject);
var
s:string;
begin
while not ADOQuery1.Eof do
begin
s:=('http://212.6.12.135:1010/s.asp?n='+adoquery1.field.fiels[1].asstring+'&m='+memo1.text+'');
WebBrowser1.Navigate(s);
ADOQuery1.Next;
end;
end;
end.
Admin: Пользуемся тегами!

По окончанию сообщение в WebBrowser-e выводиться только один MsgId=...........
_____Как сделать чтоб после отправки одной сообщения я взял ответ от webBrowser a, а после как получил ответ чтоб оно шло дальше по циклу.....

Подскажите как быть............
Ответить с цитированием