verzeichnis auslesen

[NicNacMan]

hi@all

gibt es eine möglichkeit die dateinamen eines verzeichnisses (http://www.ballaballa.de/images/) rauszufinden, auf das man keine schreibrechte hat?

ich habs mit idhttp.get probiert, wobei ich dann nur den quellcode der vom server generierten liste erhalte, und den erst mit copy() und pos() filtern muss. das ist natürlich net so schön, und außerdem bekomme ich ab und zu fehlern.
ich habs dann auch mal mit idftp probiert, aber dafür brauche ich username und pw.
der verzeichnis hat chmod 755, und enthält keine index-datei.

hab schon im forum und goolge und co gesucht, aber nicht wirklich was gefunden (wusste auch net direkt wonach).

danke schonmal
cu nicnacman

[Airblader]

Hm...die Frage würde mich grad auch brennend interessieren...

kannst du mir das Programm dann auch geben (die Url muss dann variabel sein), wenn es geht?

Ich bräuchte das nämlich sehr dringend bis heute....ich muss ein Java Applet rutnerladen, hab bisher schon 3 Dateien, aber halt nich alle

air

[NicNacMan]

meinste wenns fertig is, oder so wie es jetz ist (mit idhttp.get)?

geht das überheupt mit idftp, oder kommt man bei öffentlichen verzeichnissen nur mit idhttp weiter?

[NicNacMan]

^push^ :mrgreen:

is wahrscheinlich jetzt zu spät, aber vll kannstes ja immernoch gebrauchen.
so hab ichs bis jetzt gemacht:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  mysl: TStringList;
  i   : Integer;
begin
  mysl := TStringList.Create;
  try
    mysl.Text := IdHTTP1.Get('http://www.testpage.de/images/');
    for i := Pred(mysl.Count) downto 0 do
      if (Copy(mysl.Strings[i], 1, 20) <> '<IMG SRC="/file.gif"') then
        mysl.Delete(i);
    mysl.SaveToFile(ExtractFilePath(ParamStr(0)) + 'dir.txt');
  finally
    mysl.Free;
  end;
end;