Email

Iskam da izpratia email ot programata koiato polzvam.Problema e che kato suzdavam emaila triabva da natisna Send (Izprati) za da go izpratia.Az iskam vsichko tova da e avtomatizirano.Niakoi da znae kak?

Ти ли си я правил тая програма или някой друг? Ако си ти, кажи какъв код използваш за изпращане на email.
Чак тогава може да се даде смислен отговор.

чети и дишай по-леко

Май човека ползва shell функцията за да отвори default mail client- а ;-))) - поне само така си мисля, че ще има проблем със send бутона.

За автора на темата - погледни в примерите на Delphi мисля(Indy\mailClient или FastNet\SMTP), че има пример за пращане на mail -само, ти трябва smtp сървър данните (т.е ако има такъв въведен в системата примерно за Outlook или за някоя друга често срещана майл програма и ти го откраднеш заедно с login/password обаче - макар повечето от нашите провайдери не слагат пароли)

---
Е т'ва е живот!

kato stana duma za mail
koite shte mi obqsni kak stava toq nomer samo sys email client li ili moje i direktno?
malko info pls

в предния ми постинг. Виж обаче пращането на email с attachment в по сложно(не само заради encoding-a).

---
Е т'ва е живот!

Eto edin primer za send mail kato izpolzva6 MSOutlook v uses triabva da ima6 OleServer, Outlook2000. Kato Dobavi6 na formata OutlookApplication i MailItem DElphi avtomati4no 6te gi dobavi. Eto i coda :
procedure TForm1.Send_mail;
var
NmSpace: NameSpace;
Folder: MAPIFolder;
begin

OutlookApplication1.Connect;
NmSpace := OutlookApplication1.GetNamespace('MAPI');
NmSpace.Logon('e-mail@something.com', 'password', False, False);

//*******************opens inbox**************
Folder := NmSpace.GetDefaultFolder(olFolderInbox);

MailItem1.ConnectTo(OutlookApplication1.CreateItem(olMailItem) as MailItem);
MailItem1.AutoConnect:=true;

MailItem1.To_:='test@something.com';
MailItem1.CC:='test2@something.com';

//****************body of e-mail**************************/
MailItem1.body:='Dear something,'+chr(13)+ //*********chr(13) is EOL
'This is just a test e-mail '+chr(13)+
'BR Verbatim';
//****************body of e-mail**************************/
MailItem1.Subject:='subject of test e-mail';
//***************sends the e-mail without prompt**************************/
MailItem1.Send;
OutlookApplication1.Close;

end;

abe problem idva 4e D7 nevijdam da ima FastNet a dok kolkoto razbiram s nego e po lesno izprashtaneto na mail....
i vse pak ako nqkoi mi poso4i linkove za info kak da izpratq mail ot prilojenie bez da se polzva MAPI trqbva mi samo 20tina simvola da moje da prashta

ili a pyk ako nqkoi mi predloji na4in da prashtam message do ICQ ili neshto podobno pak nqma da mu se razsyrdq....
ideqta e da se izprati informaciq do potrebitelq no ne se znae dali toi e online v momenta.....