Показать сообщение отдельно

  #26  
Старый 10.05.2007, 20:24
neji
Новичок
Регистрация: 22.02.2007
Сообщений: 3
Провел на форуме:
46140

Репутация: 5
Отправить сообщение для neji с помощью ICQ
По умолчанию

Код:
idSmtp.Host:=<smtp>;    // smtp.mail.ru
idSmtp.UserName:=<user name>;
idSmtp.Password :=<password>;
// если не надо авторизации на смтп сервере
idSmtp.AuthenticationType:=atNone
// если надо
idSmtp.AuthenticationType:=atLogin
......
if not idSmtp.Connected then idSmtp.Connect;
idMess.Body.Clear;
idMess.Body.Add('ТЕКСТ')
idMess.From.Address:=<отправитель>;
idMess.Subject:='тема';
idMess.Recipients.EMailAddresses:=<получатель>;
idSmtp.Send(idMess);
idSmtp.Disconnect;
Удачи!!

Последний раз редактировалось neji; 10.05.2007 в 20:27..
 
Ответить с цитированием