Sprawdzanie poczty

0

Czy ma ktos źródło jakiegoś programiku (lub wie jak go zrobić) który mówi czy na skrzynce pocztowej są jakieś nowe maile???

0

wrzucasz na forme komponent TNMPOP3 i piszesz taka procedurke:
var
LiczbaMaili : Intger;
begin
NMPOP31.TimeOut := 20000;
NMPOP31.AttachFilePath := '.\';
NMPOP31.Host := 'Host serwera POP3 np. pop3.poczta.onet.pl';
NMPOP31.UserID := 'Twoj id np. ReNe';
NMPOP31.Password := 'Twoje haslo np. 4programmers';
NMPOP31.ReportLevel := Status_Basic;
NMPOP31.Connect;
LiczbaMaili := NMPOP31.MailCount;
end;
teraz sobie piszemy np w OnClose:
NMPOP31.Disconnect;

LiczbaMaili zawiera liczbe wszystkich maili na serwerze
pisalem to z pamieci wiec moze nie dzialac :)

--
-=-=[ Delphi 3, 6 ]=-=-
-=-=-==[ LKS ]==-=-=-
-=[ [email protected] ]=-

0

Działa! BIG TX!

0

A mi nie działa. "Connection Failed"

1 użytkowników online, w tym zalogowanych: 0, gości: 1