|
Вопрос # 2 332/ вопрос открыт / |
|
Доброго времени суток, уважаемые эксперты!
а куда в TNMSMPT6 Content-type вставить?
а если так
Приложение: Переключить в обычный режим- procedure TForm1.Button2Click(Sender: TObject);
- begin
- IdSMTP1.Port:=25;
- IdSMTP1.Host:='smtp.skif.com.ua';
- IdSMTP1.Connect;
- TidAttachment.Create(Msg.MessageParts,ExtractFileName('send.eml'));
- Msg.Subject:='òåêñò
òåìè'; //òåêñò
òåìè
ïîâ³äîìëåííÿ
- Msg.Recipients.EMailAddresses:='tarasgavrilov@gmail.com';//âêàçóåìî
àäðåñè
îòðèìóâà÷³â
- Msg.From.Address:='gtn@inet.ua';//âêàçóåìî
àâòîðà
ëèñòà
- Msg.ContentType:='text/html';//êîäóâàííÿ
ëèñòà
- Msg.CharSet:='windows-1251';
- Msg.ContentTransferEncoding:='8bit';
- Msg.Body.LoadFromFile('send.html');
//ðîçì³ùóåìî
òåêñò
ïîâ³äîìëåííÿ
- Msg.Date:=StrToDate(DateToStr(Now));//äàòà
â³ïðàâêè
ëèñòà
- if idSMTP1.Connected=True then IdSMTP1.Send(Msg);
- IdSMTP1.Disconnect;
- end;
 |
Вопрос задал: toro1 (статус: Посетитель)
Вопрос отправлен: 21 января 2009, 21:08
Состояние вопроса: открыт, ответов: 0.
|
Мини-форум вопроса
Мини-форум пуст.
Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.
|
