Отправка почты

Тема в разделе "Delphi - Сети", создана пользователем Experimentator, 7 май 2011.

  1. Experimentator

    Регистрация:
    24 май 2008
    Сообщения:
    8
    Симпатии:
    0
    Отправляю письмо из RichEdit, оно достваляется но вместо русских симовлов стоят вопросы, перепробывал ставить charset и различные функции, здесь пересмотрел но ничего ненашел толкового, помогите очень сильно нада!!! :) :) :facepalm:
    Код (Delphi):
    //Отправка письма
    form1.IdSMTP1.Host:='smtp.mail.ru';
    form1.IdSMTP1.Port:=587;
    form1.IdMessage1.Encoding:=meMIME;
    form1.IdMessage1.ContentType:= 'text/plain';
    form1.IdMessage1.ContentDisposition:= 'inline';
    form1.IdSMTP1.Username:='mymail';
    form1.IdSMTP1.Password:='myparol';
    form1.IdMessage1.Body.Text:=form1.richedit1.text;
    form1.IdMessage1.From.Text:='mymail@mail.ru';
    form1.IdMessage1.Recipients.EMailAddresses:=mail@mail.ru;
    form1.IdMessage1.Subject:='Привет';//

    form1.IdSMTP1.Connect;
    if form1.IdSMTP1.Connected = true then
    begin
    form1.IdSMTP1.Send(form1.IdMessage1);
    showmessage('Сообщение отправлено');
    form1.IdSMTP1.Disconnect();
    end else
    begin
    showmessage('Сообщение неотправлено');
    form1.IdSMTP1.Disconnect();
    end;
     
  2. sinkopa

    sinkopa Well-Known Member

    Регистрация:
    17 июн 2009
    Сообщения:
    344
    Симпатии:
    9
    Старая, заезженная тема... Повторяться чегото не хочется мне... а потому, почитайте вот тут пожалуйста:
    http://www.sql.ru/forum/actualthread.aspx?tid=669703
     
Загрузка...
Похожие Темы - Отправка почты
  1. Мыш
    Ответов:
    9
    Просмотров:
    1.533
  2. Реник
    Ответов:
    2
    Просмотров:
    1.389
  3. olga13
    Ответов:
    16
    Просмотров:
    3.655
  4. Experimentator
    Ответов:
    1
    Просмотров:
    3.939
  5. makaset
    Ответов:
    13
    Просмотров:
    4.230

Поделиться этой страницей