|
Hola gracias por tu atencion
Ya tengo el proyecto con la información que me diste pero al compilarlo me aparece lo siguiente
[Fatal Error] Could not create output file 'C:\Program Files\Borland\Delphi6\Projects\Project2.exe'
asi quedo el código:
procedure TForm1.tbEnviarClick(Sender: TObject);
begin
smtp.Host:= 'smtp.live.com';
smtp.UserID:= 'paty_mnmr';
smtp.PostMessage.Attachments.Add('Adjunto := C:\Users\Paty_Tyler\Documents\Clave.txt');
smtp.PostMessage.Body.Add('Mensaje enviado exitosamente');
smtp.PostMessage.Date:= '11/22/09';
smtp.PostMessage.FromAddress:= 'paty_mnmr@hotmail.com';
smtp.PostMessage.FromName:= 'Paty';
smtp.PostMessage.ReplyTo:= 'paty_mnmr@hotmail.com';
smtp.PostMessage.Subject:= 'Hi';
smtp.PostMessage.ToAddress.Add('de_marian_@hotmail.com');
smtp.Connect;
smtp.SendMail;
end;
Que será? o falta algo en la sección de Uses?
GRACIAS
|