Ver Mensaje Individual
  #5  
Antiguo 13-11-2012
Avatar de movorack
[movorack] movorack is offline
Miguel A. Valero
 
Registrado: feb 2007
Ubicación: Bogotá - Colombia
Posts: 1.346
Reputación: 22
movorack Va camino a la famamovorack Va camino a la fama
Que pena... pero que es exactamente un dts?

Ahora si lo que entendí es correcto. lo que necesitas es validar el resultado de la operación para intentar repetirla si fué fallida.

Podrías crear una función para subir al ftp que te devuelva el resultado de la carga (True/False) y si es false validar para volver a ejecutar n veces hasta obtener el resultado correcto.

Algo así:

Código Delphi [-]
function SubirEnFTP : boolean;
begin
  try
    //lineas para subir
    Result := True;
  except
    //Lineas para el manejo del error
    Result := False;
  end;
end;

procedure SubirArchivos
  var
    CanIntentos : Smallint;
begin
  CanIntentos := 5;
  while CanIntentos > 0 do
  begin
    if SubirEnFTP then
      Break;
    dec(CanIntentos);
  end;  
end;
__________________
Buena caza y buen remar... http://mivaler.blogspot.com
Responder Con Cita