Originariamente inviato da alka
Non ho avuto problemi di questo tipo nell'invio di email.
Come hai configurato il componente? :master:Tutte le altre impostazioni come da default.codice:object SMTP: TIdSMTP MailAgent = 'Mozilla Thunderbird 1.5.0.8 (Windows/20061025)' UseEhlo = False SASLMechanisms = <> Host = 'mail.libero.it' end object MailMessage: TIdMessage AttachmentEncoding = 'MIME' ContentType = 'multipart/alternative' Encoding = meMIME ConvertPreamble = True Left = 448 Top = 8 end
Per l'invio dell'e-mail:
Mi sembrano tutte cose normali... Ma Libero la pensa diversamente!codice://setup mail message MailMessage.From.Address := ... MailMessage.From.Name := ... MailMessage.Recipients.EMailAddresses := ... MailMessage.Subject := 'Oggetto'; MailMessage.Body.Text := 'Questo è un messaggio HTML!'; lTextPart := TIdText.Create(MailMessage.MessageParts); lTextPart.Body.Text := '<html><body>Prova per l''invio di un e-mail!</body></html>'; lTextPart.ContentType := 'text/html'; try try SMTP.Connect; SMTP.Send(MailMessage); except on e : Exception do // Riporta eccezione end; finally if SMTP.Connected then SMTP.Disconnect; end;

Rispondi quotando