Извините, ничего не найдено.

Не расстраивайся! Лучше выпей чайку!
Регистрация
Справка
Календарь

Вернуться   www.boolean.name > Программирование игр для мобильных телефонов > MidletPascal > Основной форум

Основной форум Сюда все проблемы связанные с программированием.

Ответ
 
Опции темы
Старый 17.01.2014, 18:12   #1
S_007
Нуждающийся
 
Аватар для S_007
 
Регистрация: 30.01.2011
Сообщений: 76
Написано одно полезное сообщение
(для 7 участников)
Что опять не так?

делаю все как сказано по этой ссылке http://forum.boolean.name/showthread.php?t=8710

по этому примеру

Program SMTP2test;
Uses smtp2;
Var i: integer;
from, rcpt, subj, text : string;
Begin
ShowForm;
i:=FormAddString('Начинаем отправку письма...');
smtp2.account('lib_test', '123456'); // Логин и пароль от MAIL.RU ящика
smtp2.auth_mode(1); // 1 - значит, что SMTP сервер требует авторизации
smtp2.set_pause(500); // Пауза при ожидании ответа от сервера
from:='lib_test@mail.ru'; // От кого
rcpt:='odd-coder@yandex.ru'; // Кому
subj:='Test msg'; // Заголовок письма
text:='Hi there! Hello dolly! Kisa kuku!'; // Тело письма
i:=smtp2.send('smtp.mail.ru', 2525, from, rcpt, subj, text); // Высылаем
Repaint; Delay(-1);
End.

письма отправляются но до адресата не доходят, вчем проблема? Телефон нокиа, может это? У кого есть рабочая либа? Может для нокиа надо какой-то особый подход?
Прошу помощи!
(Offline)
 
Ответить с цитированием
Старый 18.01.2014, 10:35   #2
Amigo888
Нуждающийся
 
Регистрация: 05.08.2011
Сообщений: 83
Написано 16 полезных сообщений
(для 16 пользователей)
Ответ: Что опять не так?

Program SMTP2test;
Uses smtp2;
Var i: integer;
from, rcpt, subj, text : string;
Begin
smtp2.account('zakir.gimranov', 'пароль');
smtp2.auth_mode(1);
i:=smtp2.send('smtp.mail.ru', 2525, 'zakir.gimranov@mail.ru', 'zakir.gimranov@yandex.ru', 'Test', 'Hi there! Привет!');
End.


100% рабочий пример лично проверил (версия MP 2.02)
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
S_007 (19.01.2014)
Старый 18.01.2014, 10:46   #3
Amigo888
Нуждающийся
 
Регистрация: 05.08.2011
Сообщений: 83
Написано 16 полезных сообщений
(для 16 пользователей)
Ответ: Что опять не так?

А вот рабочий твой пример
Program SMTP2test;
Uses smtp2;
Var i: integer;
from, rcpt, subj, text : string;
Begin
ShowForm;
i:=FormAddString('Начинаем отправку письма...');
smtp2.account('zakir.gimranov', 'пароль'); // Логин и пароль от MAIL.RU ящика
smtp2.auth_mode(1); // 1 - значит, что SMTP сервер требует авторизации

from:='zakir.gimranov@mail.ru'; // От кого
rcpt:='zakir.gimranov@yandex.ru'; // Кому
subj:='Test msg'; // Заголовок письма
text:='Hi there! Hello dolly! Kisa kuku!'; // Тело письма
i:=smtp2.send('smtp.mail.ru', 2525, from, rcpt, subj, text); // Высылаем
Repaint; Delay(-1);

End.
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
S_007 (19.01.2014)
Старый 19.01.2014, 11:37   #4
S_007
Нуждающийся
 
Аватар для S_007
 
Регистрация: 30.01.2011
Сообщений: 76
Написано одно полезное сообщение
(для 7 участников)
Ответ: Что опять не так?

Amigo888 Спасибо за ответы..! Скажите ещё, почему порт выставляется 2525 а не просто 25? Если я ставлю порт 587, (у меня smtp.gmail.com) все четко, gprs включается, письмо быстро уходит, а в почтовом ящике куда отправлял даже письмом и не пахнет, если оставляю порт 2525 как в примере,gprs включается и мидлет помоему даже висит, очень долго ничего не происходит... Примеры компилирую в версии 3.3, если в 2.02, то грёбаная нокиа начинает ругаться на FW class и мидлет не запускается вообще, другого телефона нет под рукой чтоб попробовать. А на каком телефоне пробовали Вы?
(Offline)
 
Ответить с цитированием
Старый 19.01.2014, 15:38   #5
Amigo888
Нуждающийся
 
Регистрация: 05.08.2011
Сообщений: 83
Написано 16 полезных сообщений
(для 16 пользователей)
Ответ: Что опять не так?

я тоже попытался отправить через gmail, тоже не удалось. Видимо у них какая защита стоит...
(Offline)
 
Ответить с цитированием
Старый 19.01.2014, 18:49   #6
S_007
Нуждающийся
 
Аватар для S_007
 
Регистрация: 30.01.2011
Сообщений: 76
Написано одно полезное сообщение
(для 7 участников)
Ответ: Что опять не так?

неа, ничо не получилось и с mail.ru, всё тоже самое...
(Offline)
 
Ответить с цитированием
Старый 20.01.2014, 12:25   #7
Amigo888
Нуждающийся
 
Регистрация: 05.08.2011
Сообщений: 83
Написано 16 полезных сообщений
(для 16 пользователей)
Ответ: Что опять не так?

Вот эту либой замени свою, тогда вот этот пример будет работать

Program SMTP2test;
Uses smtp2;
Var i: integer;
from, rcpt, subj, text : string;
Begin
smtp2.account('логин от маил', 'пароль');
smtp2.auth_mode(1);
i:=smtp2.send('smtp.mail.ru', 2525, 'свой логин@mail.ru', 'адрес получателя', 'Test', 'Hi there! Привет!');

End.
Вложения
Тип файла: zip Lib_smtp2 (2).zip (2.4 Кб, 74 просмотров)
(Offline)
 
Ответить с цитированием
Сообщение было полезно следующим пользователям:
S_007 (23.01.2014)
Старый 23.01.2014, 13:43   #8
S_007
Нуждающийся
 
Аватар для S_007
 
Регистрация: 30.01.2011
Сообщений: 76
Написано одно полезное сообщение
(для 7 участников)
Ответ: Что опять не так?

Amigo888, Спасибо огромное за твои ответы! Пробовал твою либу и твой пример на разных телефонах, результат тот-же. Пришел к выводу что это из-за оператора
(Offline)
 
Ответить с цитированием
Ответ


Опции темы

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.


Часовой пояс GMT +1, время: 13:20.


vBulletin® Version 3.6.5.
Copyright ©2000 - 2017, Jelsoft Enterprises Ltd.
Перевод: zCarot
Style crйe par Allan - vBulletin-Ressources.com