Hola, estoy desarrollando una aplicación en aspx.net con Framework 1.1 y Delphi 2005. En una de sus partes deseamos enviar un correo electrónico al cliente. A continuación les escribo el código que usamos al dar clic sobre un botón:
Código Delphi
[-]
procedure TWebForm1.btnUpload_Click(sender: System.Object; e: System.EventArgs);
var
correo : MailMessage;
begin
correo := MailMessage.Create ();
correo.From := 'carlos34@quetzal.com.mx';
correo.&To := 'antonio@hotmail.com';
correo.Body := 'Cuerpo del mensaje';
correo.Subject := 'Asunto 3';
correo.Fields.Add
('http://schemas.microsoft.com/cdo/configuration/smtsperver', 'smtp.quetzal.com.mx');
correo.Fields.Add('http://schemas.microsoft.com/cdo/configuration/smtpserverport', '25');
correo.Fields.Add('http://schemas.microsoft.com/cdo/configuration/sendusing', '2');
correo.Fields.Add('http://schemas.microsoft.com/cdo/configuration/smtpauthenticate', '1');
correo.Fields.Add('http://schemas.microsoft.com/cdo/configuration/sendusername', 'prueba@quetzal.com.mx');
correo.Fields.Add('http://schemas.microsoft.com/cdo/configuration/sendpassword', '123456jr');
SmtpMail.SmtpServer := 'smtp.quetzal.com.mx';
SmtpMail.Send(correo);
correo.Free;
end;
La aplicación se ejecuta pero al tratar de enviar el correo marca el siguiente error:
Error al actualizar los campos. Para obtener más información, examine la propiedad Status de los campos de cada objeto individual.
Saludos a todos Selman.