Форум » [x]Harbour » Почта Mail RU + hb_SendMail + SSL » Ответить
Почта Mail RU + hb_SendMail + SSL
Dima: А что б он был здоров. Получил сегодня месагу [pre2] Вы получили это письмо, т.к. для просмотра почты Mail.Ru используете почтовую программу (Outlook, The Bat! и т.п.). Мы постоянно работаем над улучшением безопасности Почты Mail.Ru. Поэтому в ближайшее время на POP3 и SMTP-серверах останется только безопасная авторизация через протокол SSL http://ru.wikipedia.org/wiki/SSL . В связи с этим вам необходимо внести изменения в настройки ваших почтовых клиентов. Мы уже подготовили для вас подробную инструкцию, которую вы можете найти по адресу https://help.mail.ru/mail-help/mailer/popsmtp Не волнуйтесь, вы успеете изменить настройки — почтовые программы будут работать с текущими настройками ещё в течение месяца. При возникновении каких-либо проблем при настройке, пожалуйста, обращайтесь в Службу поддержки, просто ответив на это письмо, или написав по адресу support@corp.mail.ru. Мы обязательно поможем! [/pre2] Аутглюк я перестроил согласно https://help.mail.ru/mail-help/mailer/moexp Работает. А вот как быть с отправкой почты из Harbour ? Ну порты я сменю а как авторизоваться через SSL ? В hb_SendMail и опции вроде нет такой или я не заметил ?
Andrey: Dima пишет: перед отправкой проверяю есть ли инет А я переделал пример Григория - \MiniGUI\SAMPLES\Advanced\INET_CHECKER
Dima: Andrey а я свой наваял ;) [pre2] function HB_PING( URL ) local wRet := .T. local hSocket HB_InetInit() if empty(URL) URL := "www.google.com" endif hSocket := hb_inetCreate(2000) hb_inetConnect( URL,80,hSocket ) if hb_inetErrorCode( hSocket )#0 wret:=.f. endif *? hb_inetErrorDesc( hSocket ) HB_InetCleanup() Return wRet [/pre2] А пример конечно тормозной когда нет инета , видать таймаут большой ждет я про INET_CHECKER , такая задержка просто не приемлема.
Andrey: Dima пишет: А пример конечно тормозной когда нет инета Странно. Он у меня всегда быстро возвращал ответ. Правда я его только у себя тестировал, в других условиях не тестировал.
Dima: Dima пишет: а я свой наваял ;) function HB_PING( URL ) А вот и нежданчик Функция кривая оказалась... Есть VPN (инет) и есть сеть - вернет TRUE // нормально Выключаю VPN (инет), сеть есть - вернет FALSE // нормально Выключаю VPN (инет), выключаю сеть - вернет TRUE // НЕ нормально
Dima: Dima пишет: А вот и нежданчик Лечим его так [pre2] if wret ahost:=HB_INETGETHOSTS( URL ) if ahost==NIL .or. len(ahost)==0 wret:=.f. endif endif [/pre2]
Andrey: Dima пишет: Лечим его так Давай тогда полную рабочую функцию !
Dima: да без проблем. [pre2] function HB_PING( URL ) local wRet := .T. local hSocket local ahost HB_InetInit() if empty(URL) URL := "www.google.com" endif hSocket := hb_inetCreate(2000) hb_inetConnect( URL,80,hSocket ) if hb_inetErrorCode( hSocket )#0 wret:=.f. endif if wret ahost:=HB_INETGETHOSTS( URL ) if ahost==NIL .or. len(ahost)==0 wret:=.f. endif endif HB_InetCleanup() Return wRet [/pre2]
Andrey:
alexandr11: пытаюсь собрать hbssl.lib из hbssl.hbc BCC по подсказкам Dima bio.c вроде собирается, но дальше ошибка hbmk2: error: running c/c++ compiler. -1 и список параметров в чем же дело? может, кто-то подскажет или поделится готовым
Dima: Bio собирал так , для MinGW Батник set path=C:\MinGW\bin\ SET HB_WITH_OPENSSL=C:\OpenSSL-Win32\include c:\hb32mingw\bin\hbmk2 bio.prg -lhbssl.hbc
alexandr11: я никак не соображу error: unresolved external '_OpenSSl_add_all_digests' referenced from ...harbour\lib\hbssl.lib|evpmd ... и таких много ... hbssl.lib|ssl hbssl.lib|bio
Dima: Где лежит hbssl.lib когда собираете bio.prg ? Как собираете пример ?
alexandr11: hbssl.lib уже где только не лежал =) примерно так SET HB_WITH_OPENSSL=C:\OpenSSL-Win32\include c:\minigui2.4\harbour\bin\hbmk2 bio.prg -lhbssl.hbc -comp=bcc получаю hbmk2: error: running c/c++ compiler. -1 bcc32.exe ...параметры, в том числе временный файл...
Dima: судя по всему hbmk2 не видит BCC поэтому уберите -comp=bcc и добавьте в батник set path=C:\MiniGUI2.4\Harbour\bin\
alexandr11: спасибо. теперь unable to open file 'C0X32.obj' hbmk2: error: running linker. 2
Dima: alexandr11 Хотелось бы увидеть весь батник
alexandr11: set path=C:\minigui2.4\harbour\bin\ SET HB_WITH_OPENSSL=C:\OpenSSL-Win32\include c:\minigui2.4\harbour\bin\hbmk2 bio.prg -lhbssl.hbc
Dima: alexandr11 пишет: set path=C:\minigui2.4\harbour\bin\ вот сюда надо прицепить еще путь к BCC что то типа set path=C:\minigui2.4\harbour\bin\;C:\bcc55\bin\ и обратите внимание что бы в конце строки не было лишнего пробела
alexandr11: у меня и компилятор и линкер в harbour\bin и include тоже спасибо за помощь постараюсь сам разобраться
Softlog86: Вроде собралась HBSSL.LIB ... Добавил в программу строчку : REQUEST __HBEXTERN__HBSSL__ Компилирую через HBMK2 : ошибка ! Turbo Incremental Link 5.00 Copyright (c) 1997, 2000 Borland Error: Unresolved external '_HB_FUN___HBEXTERN__HBSSL__' referenced from C:\TMP\HBMK_C3Q5KN.DIR\PLIST.OBJ hbmk2[PLIST]: Error: Running linker. 2 не могу понять - подключается вновь созданная HBSSL.LIB к проекту или нет .
полная версия страницы