verificar link de descargar utilizando IdHTTP
 

hola foro como andan espero que bien bueno estoy tratando desde una aplicacion verificar si un link de descarga directa esta disponible o no para esto estuy utilizando el componente IdHTTP de las indy bueno hasta hay no hay problema la forma en que estoy haciendo desde codigo lo que digo es asi primero miremos la interfaz que es la siguiente:


ahora lo que hago en el boton verificar es lo siguiente

Código Delphi [-]
procedure TForm1.VerificarClick(Sender: TObject);
var
  IdHTTP: TIdHTTP;
  Response: String;
begin

  IdHTTP := nil;
  try

    IdHTTP := TIdHTTP.Create(nil);
    IdHTTP.Get(Trim(Edit1.Text));

    (* el edit1 tiene el link de descarga *)
    Response := IdHTTP.Get(Trim(Edit1.Text));

    Memo1.Text:= Response;

    if  IdHTTP.ResponseCode=404 then begin
    Label1.Caption:='link rroto';
   end else
    Label1.Caption:='link bueno';

  finally
    IdHTTP.Free;

  end;

end;

el siguiente codigo lo probe con un link que estaba bueno y esta alojado en rapidshare para los que quieran probar esre es el link

Link Bueno


y me arrojo lo siguiente





hay no hay problema por que el link esta bueno ahora coloco un link malo y miren me sigue arrojando lo mismo

aqui el link

link malo


entonces no se que estoy haciendo mal si es que no se utilizar el conponente o que estara pasando y otro problema es que me gustaria hacerlo de manera general no solo para archivo alojados en rapidshare si no para otros

saludos desde ya gulder gan y gracias por su interes chau

¿Y si accedes al testo de la página?
Me parece que el problema es que RapidShare siempre devuelve una página existente, y en su interior explica si el link es bueno o malo, pero la página es buena.

ok Neftali gracias por el interes pero si alguien tiene alguna idea vienbenida sera salu2

Pues la idea es la que te comento Neftali, revisar el texto que la pagina, que te arroja el link malo y ahi puedes verificar si es bueno o malo, creo que lo que estas esperando es un error 404, pero al menos en paginas como rapidshare no sera posible eso. (incluso ya todos estan generando paginas especiales para mostrar ese error).