Komponent do wysylania maili | inny niz Indy

0

Czesc, szukam komponentu do wysylania maili. Musi miec obsluge SMTP i autoryzacje (uwierzytelnianie).

Nie porponujcie mi tylko Indy 9/10. Juz testowalem, dla moich wymagan nie jest on dobry, potrzebuje alternatywy. Slyszalem, ze FastNet jest dobry, ale platny :/

Zatem prosze Was o zamieszczenie nazwy komponentu, linka do niego oraz (co wazne!) przykladowego kodu do wysylania maili (podobnego do tych, co sa w FAQ) - aby uniknac kolejnych pytan.

Z gory wielkie dzieki!!!

0

Szukaj MailMessage2000, przykłady w zestawie powinny być.

0

synapse

0

Misiekd, juz kilka razy polecales Synapse, moglbys podac przykladowy kod na wysylanie maila ale odnoszacy sie do Synapse?

Chodzi mi o takie cos:

MessageSend.Body.Append('tresc maila'); 
 MessageSend.From.Name := 'imie od kogo';
 MessageSend.From.Address := 'adres od kogo';
 MessageSend.Recipients.EMailAddresses := 'Odbiorca';
 MessageSend.Subject := 'temat';

 { UserName bądź UserId - to jest zeleżne od wersji Indy. ja pisałem na Indy 8 }
 SMTP.UserName := 'nazwa użytkownika serwera SMTP';
 SMTP.Password :=  'hasło';
 SMTP.Host :=  'adres serwera SMTP';
 SMTP.AuthenticationType:=atLogin; // autoryzacja SMTP
 SMTP.Connect; 
 try
  SMTP.Send(MessageSend); //wyślij
 finally
  SMTP.Disconnect; 
 end;

ale to co podalem to Indy, przerob mi to na Synapse :)

MailMessage2000 - nie moge tego znalezc, jak wpisuje te fraze na google to znajduje jeden wynik, ktory do niczego konkretnego nie prowadzi. Mozesz mi napisac jakis link do tych komponentow i ew. przykladow?

0

Synapse + opakowanie (VisualSynapse)

a przykład rano bo mmi się teraz nie chce :P

0

Ok, super. Wydaje mi sie, ze do moich skromnych potrzeb Synapse bedzie idealne. Czekam zatem z niecerpliwoscia na ten przyklad (jeszcze raz przypominam, kod ma byc taki jak z Indy, ktory przedstawilem wyzej - czyli normalne wysylanie maila przy uzyciu SMTP).

Ok, to jak juz tak drecze wszystkich to jeszcze jedno, SYNAPSE ma moze funkcje podobna do tej z Indy? np.:

Label1.Caption:=IdHTTP1.Get('www.google.pl');

Jezeli tak, to prosze o malutki przykladzik.

0
haman napisał(a)

Ok, super. Wydaje mi sie, ze do moich skromnych potrzeb Synapse bedzie idealne. Czekam zatem z niecerpliwoscia na ten przyklad (jeszcze raz przypominam, kod ma byc taki jak z Indy, ktory przedstawilem wyzej - czyli normalne wysylanie maila przy uzyciu SMTP).

to jest najprostsza wersja

  with SendMail1 do
  begin
    From := '[email protected]';
    ToOne := '[email protected]';
    //ToList := [email protected];
    Subject := 'Temat';
    Text := 'Tresc';
    Send;
  end;

Ok, to jak juz tak drecze wszystkich to jeszcze jedno, SYNAPSE ma moze funkcje podobna do tej z Indy? np.:

Label1.Caption:=IdHTTP1.Get('www.google.pl');

Jezeli tak, to prosze o malutki przykladzik.

może ściągnij sobie przykłady do synapse i je zobacz, co?

0
haman napisał(a)

Ok, to jak juz tak drecze wszystkich to jeszcze jedno, SYNAPSE ma moze funkcje podobna do tej z Indy? np.:

Label1.Caption:=IdHTTP1.Get('www.google.pl');

Jezeli tak, to prosze o malutki przykladzik.

W tak prostej wersji chyba nie. Ale możesz sobie ściągnąć bibliotekę, którą napisałem w oparciu o synapse, która na coś takiego pozwala. Konkrety: HTTP

0

Hmm, w samym Synapse jest cos takiego:

function HttpGetText(const URL: string; const Response: TStrings): Boolean;
A very usefull function, and example of use can be found in the THTTPSend object. It implements the GET method of the HTTP protocol. This function sends the GET method for URL document to an HTTP server. Returned document is in the "Response" stringlist (without any headers). Returns boolean TRUE if all went well.

Ale nijak to nie dziala. Robie tak:
HttpGetText('www.google.pl',sl);
gdzie sl:tstringlist;
albo tak: HttpGetText('http://www.google.pl',sl);

Jakbym nie robil, ciagle wyskakuje blad.

Wie ktos moze o co chodzi? Pytanie glownie do tych, co juz udzielali sie w tym temacie ;)

0

nie miałem styku z synapse ale tak z ciekawości dla formalności spytam ... zainicjalizowałeś te sl ? ;P

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