Problem z TIdPOP3

[Miroo_007]

Kod: Zaznacz cały

bool TKlient::Wczytaj_email(void) {
   int ilosc_maili;
   Form1->IdPOP31->Connect;
   ilosc_maili = Form1->IdPOP31->CheckMessages;
   //...
}

Łączę się z pocztą gmail i mam wpisane takie dane:
Host : pop.gmail.com
Password : cos_tam
Username : cos_tam
Port: 995
Ale wyskakuje mi taki błąd: [BCC32 Error] Unit1.cpp(85): E2235 Member function must be called or its address taken
Co to może być?

[Miroo_007]

Może ktoś zna inne narzędzie, które można zastosować zamiast TIdPOP3 (i nie mówię tu o TNMPOP3)?

[Miroo_007]

Mam następny problem z TIdPOP3. A mianowicie. Chcę się połączyć z pocztą w Gmail. Ta poczta posiada szyfrowanie SSL co za tym idzie wykorzystuje port 995. No ale zacznę opowieść od początku:
1. Ściągnąłem protokół SSL dla Indy 10 ze strony: http://indy.fulgan.com/SSL/.
Wybrałem openssl-0.9.8j-win32&win64.zip
2. Rozpakowałem i dodałem biblioteki libeay32.dll oraz ssleay32.dll do mojego programu.
3. Dodałem do mojego projektu następujące kontrolki: TIdPOP3 oraz TIdSSLIOHandlerSocketOpenSSL
4. Skonfigurowałem kontrolkę TIdPOP31:
IOHandler = SSLHandler
AutoLogin = True
Host = 'pop.gmail.com'
Username = 'moj_login@gmail.com'
UseTLS = utUseImplicitTLS
Password = 'moje_haslo'
Port = 995
5. Skonfigurowałem kontrolkę TIdSSLIOHandlerSocketOpenSSL1:
Destination = 'pop.gmail.com:995'
Host = 'pop.gmail.com'
MaxLineAction = maException
Port = 995
DefaultPort = 0
SSLOptions.Method = sslvSSLv2
SSLOptions.Mode = sslmUnassigned
SSLOptions.VerifyMode = []
SSLOptions.VerifyDepth = 0
6. Napisałem kod pobierający liczbę wiadomości w skrzynce. Nie zamieszczam go ponieważ można go znaleźć
na stronie Cyfrowego Barona.
7. Na koniec skompilowałem i wyskakuje mi błąd: Socket Error # 10060
Connection timed out.

[wargo]

5. Skonfigurowałem kontrolkę TIdSSLIOHandlerSocketOpenSSL1:
Destination = 'pop.gmail.com:995'
Host = 'pop.gmail.com'
Port = 995

Myślę że może jak masz podany port w oddzielnym polu to chyba nie potrzeba podawać w adresie ale tu są dwa pola - destination i host a to jest różnica i tu może być problem!

[Cyfrowy Baron]

Jest tak:

Kod: Zaznacz cały

Form1->IdPOP31->Connect;

a powinno być tak:

Kod: Zaznacz cały

Form1->IdPOP31->Connect();

[Miroo_007]

Jest tak:

Kod: Zaznacz cały

Form1->IdPOP31->Connect;

a powinno być tak:

Kod: Zaznacz cały

Form1->IdPOP31->Connect();

Mały błąd przy pisaniu postu na tym forum. W kodzie programu mam Connect().

Myślę że może jak masz podany port w oddzielnym polu to chyba nie potrzeba podawać w adresie ale tu są dwa pola - destination i host a to jest różnica i tu może być problem!

Parametr destination jest automatycznie tworzony z dwóch parametrów host i port. Więc ten zapis jest poprawny.

[Cyfrowy Baron]

Klucz do rozwiązania problemu tkwi w tym komunikacie:

[BCC32 Error] Unit1.cpp(85): E2235 Member function must be called or its address taken

podaj kod który znajduje się w 85 linii, czyli ten na który wskazuje kompilator jako błędny.

[Miroo_007]

[BCC32 Error] Unit1.cpp(85): E2235 Member function must be called or its address taken

Z tym błędem już sobie poradziłem wcześniej. Teraz jest problem, z tym że nie dostaje informacji od serwera.

[Cyfrowy Baron]

Udzielasz bardzo skąpych informacji, a trudno się domyśleć z czym masz dokładnie problem.

TIdPOP3->Host - określa adres serwera TIdPOP3->Password - określa hasło TIdPOP3->Port - określa port, na którym program będzie łączył się z serwerem TIdPOP3->UserId – określa login u ytkownika. TIdPOP3->Connected: boolean - określa czy nawiązano połączenie TIdPOP3->Connect - próbuje nawiązać połączenie z serwerem TIdPOP3->CheckMessages: longint - zwraca liczbę wiadomości w skrzynce TIdPOP3->Disconnect - kończy połączenie z serwerem. TIdPOP3->Retrieve(const MsgNum: Integer; AMsg: TIdMessage): Boolean – pobiera wiadomość o wskazanym indeksie i umieszcza w zmiennej AMsg

Tutaj masz gotowe rozwiązanie.

[Miroo_007]

Znam to sprawozdanie z yoyo.pl. Tylko tam sprawa wygląda bardzo prosto ponieważ autor łączy się z pocztą przez port 110. Czyli bez szyfrowania SSL. Ja się łącze przez port 995 (z szyfrowaniem SSL) i już nie jest tak prosto.

TIdPOP3->UserId – określa login użytkownika.

Zapis UserId jest starym zapisem. Teraz jest Username.

6. Napisałem kod pobierający liczbę wiadomości w skrzynce. Nie zamieszczam go ponieważ można go znaleźć na stronie Cyfrowego Barona.

Mój błąd. Nie ma tego kodu na stronie Cyfrowego Barona ale jest na tym poście, czyli:

Kod: Zaznacz cały

bool TKlient::Wczytaj_email(void) {
   int ilosc_maili;
   Form1->IdPOP31->Connect();
   ilosc_maili = Form1->IdPOP31->CheckMessages;
   //...
}

OK. To może pytanie z innej beczki. Jaka jest kontrolka Indy, która zapobiega zerwaniu połączenia. Może to jest rozwiązaniem.

[Cyfrowy Baron]

Chyba TIdAntiFreze

[Miroo_007]

Znalazłem jakieś rozwiązanie tego problemu na zagranicznym forum. Biblioteki DLL, które należy dołączyć do programu trzeba przekopiować albo do katalogu programu albo do katalogu systemowego system32. Przekopiowałem do katalogu programu ale nie udało mi się przekopiować do katalogu system32 ponieważ już są tam te biblioteki (o innym rozmiarze i starsze) i nie mogę ich zastąpić dlatego, że jakiś program je używa. Jak można sprawdzić, który program używa (przetwarza) dany plik.

Problem może wynikać z tego że w katalogu system32 są starsze biblioteki OpenSSL.

[Miroo_007]

Znalazłem przyczynę problemu. W kodzie programu zmieniałem port i hosta. No i tam były błędy. Podsumowując jak wyskoczy Ci błąd: Socket Error # 10060 Connection timed out to mogą być następujące błędy:
1. Timeout w kontrolce TIdSSLIOHandlerSocketOpenSSL jest za krótki (najlepiej ustawić -1)
2. IdPOP3->Username jest nieprawidłowy.
3. IdPOP3->Port jest nieprawidłowy.

...
Ale wyskoczył mi nowy błąd. EIdOSSLCouldNotLoadSSLLibrary czyli błąd załadowania bibliotek libeay32.dll oraz ssleay32.dll. Podobno jest to problem z konfliktem Indy i OpenSLL ale nie będę się już z tym bawił. Zaloguje się na inne konto pocztowe bez SSL.