FoxPro Club Главная

Конференция Решения Фотоальбом Сайт М.Дроздова Статьи Файловый архив Книга Visual FoxPro 9.0 Русский Help для Visual FoxPro
Пользователей: 9209
Вход
Работа с серверами POP3,SMTP,IMAP

ActiveX для работы с серверами POP3,SMTP,IMAP. Полное управление почтой: прием, посылка, удаление, печать ... Представлен в виде набора DLL-файлов.


 
Прислал: Quiksoft Corp.   Категория: Сети (Интернет и др.)


Работа с серверами POP3,SMTP,IMAP

ActiveX для работы с серверами POP3,SMTP,IMAP. Полное управление почтой: прием, посылка, удаление, печать ... Представлен в виде набора DLL-файлов.

Ниже показан пример, взятый из помощи к компоненту. Все достаточно просто и стабильно работает в VFP.

Файл справки прилагается к архиву компонента, можете разобраться во всем сами. Но позже, я планирую написать несколько примеров работы с компонентом для тех, кому лень разбираться ;)

Скачать сам компонент можно тут - Easymail Objects
Скачивайте, запускайте и у вас появится несколько новых .dll в системе.

Теперь о лицензии ... компонент поставляется как shareware и стоит 399$. Но для русских программистов ;) есть LicenseKey ...
в нижеприведенном коде строка POP3.DemoMode=1 заменяется на:
POP3.DemoMode = 0
POP3.LicenseKey='iron/S18I500R1AX40C0Rb100'
... и все работает ... лишь бы совесть не грызла :)

-------
Procedure DisplayMail(strServer, strAccount, strPassword)

Private x, POP3

POP3 = CreateObject("EasyMail.POP3.5")
POP3.Account = strAccount
POP3.Password = strPassword
POP3.MailServer = strServer
POP3.DemoMode = 1

&& POP3.DemoMode = 0
&& POP3.LicenseKey='iron/S18I500R1AX40C0Rb100'

x = POP3.Connect()
If x <> 0 Then
return
EndIf
x = POP3.DownloadMessages(0)

POP3.Disconnect
If x <> 0 Then
return
EndIf

For Each Message In POP3.Messages
MessageBox("SUBJECT: " + Message.Subject, 0, "Message Found")
Next Message

Release POP3

EndProc

И запуск функции деается так:
Do DisplayMail With "mail.yourdomain.com", "jdoe", "secret"


 
Сделайте оценку этого решения Плохо Удовлетворительно Так себе Хорошо Отлично Текущая оценка: (4.751)
Дополнения пользователей
Работа с серверами POP3,SMTP,IMAP
[+][?]
wapo@mail.ru
17.06.01 11:42:52

А можно ли используя данные DLL-ки отправлять сообщения на NEWS-сервера?
Mr.Cat
12.07.01 16:40:31

А можно просто воспользоваться таким ActiveX как WinSock Control. И возможностей больше, и лишних
.dll не придется ставить:))
Для отправки почты я им и пользуюсь.
Игорь i_kip@mail.ru
17.07.01 10:35:49

Спасибо!
Очень удобная штука.
Я даже не подозревал что на Фоксе можно сделать собственный почтовый интерфейс.
Подскажите как убрать из сообщений 
SMTP OBJECT RUNNING IN DEMO MODE.
В примере говорится про POP. 
У SMTP нет свойтва DemoMode или я во что-то не въехал?
Elena
02.07.02 13:05:26

Все работает быстро и приятно, кроме одного случая  - получатель использует UUPC.
dimka2
21.09.06 09:32:34

Все прекрасно!
Вот только прога платная причем очень сильно платная!
DemoMode имеется только для приема POP 
а для объекта SMTP такого нет!
Все кряки найденные в инете устойчиво возвращают ошибку 105-
( инвалид лицензия ).
Истратил 2 дня впустую.
Предыдущие отзывы похожи на рекламу. Все чудесно, раньше я мыл голову плохим шампунем, а теперь
хорошим... :[

hujaev@uzpak.uz
07.02.07 23:16:34

Подскажите, как сохранить Attachment файл
Зарание спасибо
[Дополнить]



© 2000-2017 Fox Club 
При размещении любых материалов с сайта на других ресурсах- прямая ссылка на www.foxclub.ru обязательна
Яндекс.Метрика