[ Miloš Baić @ 01.02.2006. 16:33 ] @
| Kako bih mogao napraviti prost e-mail klijent koji ce sadrzati, npr.:
1) Edit1.Text ( za unos e-mail adrese )
2) Edit2.Text ( za unos teme (subject) )
3) npr. Memo1 u koji ce se unositi text mail-a za slanje
4) Button1 ( OnClick - code koji ce poslati text iz Memo1 na adresu unetu u
Edit1 sa "subject" unetim u Edit2 );
Uradio sam nesto ovako ( upload-ovano) ali to mi samo uneto prebacije u moj
default client mail program, ali ne zelim to.
Znaci, zelim da uneto direktno posaljem putem interneta kao sto cini e-mail
client program?
Pozz...
[Ovu poruku je menjao loshmiscg dana 01.02.2006. u 17:35 GMT+1] |
[ Nemanja Avramović @ 01.02.2006. 16:44 ] @
Znao sam! To ti se desava zato sto si pokusao da posaljes mail sa "mailto:" protokolom, a to ne moze tek tako. Slanje maila nije tako prosto. Pozabavi se Indy komponentama odnosno IdSMTP komponentom. U starijim verzijama Indy-ja to je NMSMTP komponenta.
[ Miloš Baić @ 01.02.2006. 17:20 ] @
Ajde da uzmemo da je Delphi 7 u pitanju, znam da to nije tako prosto, ; ) ...
Nisam se jos susretao sa IdSMTP komponentom, zato sam i postavio pitanje.
Dakle, da krenemo, kako to da nadovezem na ovaj mali programcic sa doticnom
komponentom? Moze prvo teorijski pa cemo probati i sa kodom, ; ) ?!
Sta kazes?
P.S. ukljucio sam u programcic IdSMTP komponentu, sta dalje?
[Ovu poruku je menjao loshmiscg dana 01.02.2006. u 18:24 GMT+1]
[ Nemanja Avramović @ 01.02.2006. 22:09 ] @
Pored IdSMTP ubaci i IdMessage, ona se nalazi na Indy Misc.
Ovaj kod bi trebalo da posalje poruku:
Code:
//podesi poruku
with IdMessage1 do begin
From.Address:=' [email protected]'; //adresa posiljaoca
Recipients.EMailAddresses:=' [email protected]'; //gde ide poruka
Subject:='Naslov poruke';
Body.Text:='Ovo je tekst poruke'+#13+'u dva reda :)';
end;
//podesi konekciju prema serveru
with IdSMTP1 do begin
Host:='smtp.mailserver.com'; //smtp server (adresa)
Port:=21; //21 je default port
Username:='username'; //ili username ili adresa, zavisi od smtp servera
Password:='password'; //tvoja sifra
end;
//slanje
try
IdSMTP1.Connect; //konektujemo se na server
IdSMTP1.Send(IdMessage1); //posaljemo poruku
IdSMTP1.Disconnect; //diskonektujemo se sa servera
showmessage('Poruka poslata!'); //prikazemo poruku
except
showmessage('Poruka nije poslata!'); //ako ne posalje poruku neka prikaze ovo
end;
Meni ovo nije uspelo, zato sto sam pokusao preko GMaila da saljem a on zahteva i TLS i jos nesto tako da mi stalno izbacuje neke greske oko tog TLS-a... "Normalni" mail provajderi (ako imas mail kod svog internet provajdera) ne bi trebalo da smaraju sa tim nego bi ovaj kod trebalo da radi.
Pozdrav, i ... srecno!
[ Miloš Baić @ 02.02.2006. 00:14 ] @
Probao sam sa ovim kodom i prikazuje da poruka nije poslata,
nekako brzo prijavi tu poruku,
mislim da ima neki problem da se konektuje sa serverom?!
Mozda je problem u tom portu "21"?!
Podesio sam kao sto si napisao i za "IdMessage1" i za "IdSMTP1"?!
Taj kod mi je delovao bas ok, ali nesto nestima?! :(
[ obucina @ 02.02.2006. 01:09 ] @
Port za slanje poste je 25. 21 je za FTP.
[ Miloš Baić @ 02.02.2006. 01:56 ] @
Uspeo sam resiti problem... ;)
Problem je bio u portu, trebalo je da bude 25!!!
A deo koda je isto falio:
Code: IdSMTP1.AuthenticationType := atLogin;
Jos jedno pitanje:
Kako mogu da iz ListBox-a kad selektujem jednu npr. e-mail adresu, kliknem na nju,
da se ona prikaze u npr. Edit1.Text?
[Ovu poruku je menjao loshmiscg dana 02.02.2006. u 03:16 GMT+1]
[ martinj @ 02.02.2006. 06:32 ] @
Postavi ListBox.Style na csDropDownList
i u onChange dodaj:
Code:
Edit1.Text := ListBox1.Items[ListBox1.ItemIndex];
edit: Mozes na torry.net da nadjes komponentu SakeMail koja ce ti zavrsiti posao oko slanja i primanja mail-ova...
[Ovu poruku je menjao martinj dana 02.02.2006. u 07:34 GMT+1]
[ Nemanja Avramović @ 02.02.2006. 12:35 ] @
Moja greska za port, bio sam umoran kad sam pisao :|
Nego, jel uspeo neko da salje preko GMail-a poruke ovako?
[ Miloš Baić @ 02.02.2006. 12:50 ] @
A koji je host za gmail?
Postavio sam ListBox1 i Button ( OnClick ) i ispisao kod:
Code: var
n: Integer;
begin
if OpenDialog1.Execute then
for n:= 0 to OpenDialog1.Files.Count - 1 do
ListBox1.Items.Add(OpenDialog1.Files[n]);
za OpenDialog1 sam stavio filter AllFiles(*.*) i taj kod
mi u ListBox1 ubaci ono sto zelim poslati. Kako bi trebalo
obraditi dogadjaj da pored text-a se salje i attachment?!
[Ovu poruku je menjao loshmiscg dana 02.02.2006. u 14:50 GMT+1]
[ obucina @ 02.02.2006. 15:27 ] @
Host za gmail je smtp.gmail.com, ali koristi TLS handshake, pa je potrebno koristit SSL handler za povezivanje (ako se radi sa Indy komponentama). Takodje, potrebna je i autentifikacija. Port je 465.
[ Nemanja Avramović @ 02.02.2006. 16:09 ] @
Ja se na smtp.gmail.com kacim preko porta 587 i sve lepo radi (Mozilla Thunderbird)
[ Miloš Baić @ 02.02.2006. 16:14 ] @
Ima ova komponenta "IdSSLIOHandlerSocket1", sta treba raditi sa njom?
Treba mi pomoc i u vezi attachment-a?! Treca poruka iznad...
[Ovu poruku je menjao loshmiscg dana 02.02.2006. u 17:14 GMT+1]
[ Miloš Baić @ 03.02.2006. 14:29 ] @
Koji je host za gmail i yahoo?!
Kad pokusam preko smtp.gmail.com prikazuje gresku: "5.7.0 Must issuse STARTTLS command first j3sm1388007ugd" ?!
Kako bi trebalo obraditi dogadjaj da pored text-a se salje i attachment?!
[Ovu poruku je menjao loshmiscg dana 03.02.2006. u 15:33 GMT+1]
[ Nemanja Avramović @ 03.02.2006. 20:35 ] @
Rekoh ti da sam i ja imao problema sa GMail-om a obucina rece:
Citat: obucina: Host za gmail je smtp.gmail.com, ali koristi TLS handshake, pa je potrebno koristit SSL handler za povezivanje (ako se radi sa Indy komponentama). Takodje, potrebna je i autentifikacija. Port je 465.
Za attachment ne znam... pogledaj Delphi help. Ni ja nikad nisam radio sa IdSMTP (Sa NMSMTP [stariji Indy] jesam) pa sam onaj kod gore na osnovu helpa napisao.
[ anon68680 @ 04.02.2006. 13:42 ] @
problem nastaje kada se smtp server promeni ili ugasi(ako koristis neke manje poznate). Negde na ovom forumu sam video jedan SMTPengine unit mislim da je reiser pricao nesto o tome...
[ Nemanja Avramović @ 04.02.2006. 14:09 ] @
Zasto bi se neki poznati server ugasio ili jos gore, promenio (adresu)? 
Evo ti yahoo... ko zna koliko dugo postoji... mada ja mislim da oni ne daju tek tako da se kacis na smtp i da saljes poruke, mada sam ja uspevao preko nekih Yahoo!-related IP adresa 
[ anon68680 @ 05.02.2006. 19:32 ] @
mislio sam na one manje poznate... a kao sto vidis ovi veci, uvek imas problema sa njima jer nedaju da se tek tako zakacis za smtp...
[ Nemanja Avramović @ 05.02.2006. 20:58 ] @
GMail dozvoljava... samo sto paze ljudi na sigurnost...
Copyright (C) 2001-2025 by www.elitesecurity.org. All rights reserved.
|