Ver Mensaje Individual
  #1  
Antiguo 02-06-2007
selman selman is offline
Miembro
 
Registrado: jun 2005
Posts: 26
Reputación: 0
selman Va por buen camino
Problemas para enviar un mensaje desde una página web

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.

Última edición por dec fecha: 02-06-2007 a las 09:55:09.
Responder Con Cita