![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
![]() |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
|
|
#1
|
|||
|
|||
|
Здравствуйте всем,
Очень прошу помочь с одним задачей.... Я отправляю смс сообщение на мобильный телефон. -----У меня имеется компоненты: 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.По окончанию сообщение в WebBrowser-e выводиться только один MsgId=........... _____Как сделать чтоб после отправки одной сообщения я взял ответ от webBrowser a, а после как получил ответ чтоб оно шло дальше по циклу..... Подскажите как быть............ Последний раз редактировалось Admin, 01.04.2010 в 10:23. |
|
#2
|
|||
|
|||
|
Перед отправкой сообщения думаю нужно сделать паузу.
я так понимаю что у вас отправляется только первое сообщение? |
|
#3
|
|||
|
|||
|
Да у меня только одно отправляется,
Например как можно сделать так чтоб после вывода результата в WebBrowser у меня проверила и после результата перешла на следующий.... Когда в цикле делаю у меня все обрабативает но отправляет только на один номер....???? |