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));
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