no hay caso, se cae, kovacs.cl es mi servidor oficial de correo por que no conecta tendre que conficurar algo mas en el componente idsmpt?
Código Delphi
[-]
IdSMTP1.Port := 25;
IdSMTP1.Host := 'kovacs.cl';
IdSMTP1.Username := '';
IdSMTP1.Password := '';
IdMessage1.Recipients.Add;
IdMessage1.Recipients[0].Name := 'armijo';
IdMessage1.Recipients[0].Address := 'cmena@kovacs.cl';
IdMessage1.From.Name := 'mena';
IdMessage1.From.Address := 'cmena@kovacs.cl';
IdMessage1.Subject := 'prueba';
IdMessage1.Body.Text := 'la raja';
IdSMTP1.Connect(30000);
try
try
IdSMTP1.Send(IdMessage1);
except
on exception E: Exception do
ShowMessage('fallo');
end;
finally
if IdSMTP1.Connected then
IdSMTP1.Disconnect;
end;
IdMessage1.Free;
IdSMTP1.Free;
end;