Übernahme von Verzeichnissen als Text

[Butterfisch]

Na da warte ich doch besser auf eine erläuternde Antwort des Autors.
Kann mir nicht vorstellen, dass das Programm ohne rekursive Erfassung der Verzeichnisse/Unterverzeichnisse/Dateien arbeitet.

chhuebner hat Recht. Verzeichnisse stehen nur zur Auswahl, werden aber nicht anzeigt.
Das mit der Richtext.ocx ist ja ein Ding... Ich hatte den ganzen Kram eigentlich kürzlich (...wann war das noch genau...) erst aktualisiert. Aber vor solchen Überraschungen ist man nie ganz sicher... Welche Version hast du denn?

[louiggy]

Jetzt ist es auch öffentlich...
http://www.winload.de/download/53771

Lieber Butterfisch, bekomme nach Download bei WinZip folgende Meldung:

"Datei kann nicht geöffnet werden, offenbar handelt es sich nicht um ein gültiges Archiv"

habe den Download auch über eine andere Seite "getätigt", mit dem gleichen Ergebnis, ((Hinweis dort, mich an den Autor zu wenden) woran liegt das?

[springmaker]

Lieber Butterfisch, bekomme nach Download bei WinZip folgende Meldung:

"Datei kann nicht geöffnet werden, offenbar handelt es sich nicht um ein gültiges Archiv"

habe den Download auch über eine andere Seite "getätigt", mit dem gleichen Ergebnis, ((Hinweis dort, mich an den Autor zu wenden) woran liegt das?

das kann ich so nicht bestätigen. Habe gestern abend gegen 22 Uhr auf meinem Bürorechner dieses Programm probeweise ohne Probleme installiert.
Auch bei mir zu Hause gab es soeben keinerlei Schwierigkeiten.
Allerdings benutze ich nicht das Programm " Winzip" .

springmaker

[gast0815]

chhuebner hat Recht. Verzeichnisse stehen nur zur Auswahl, werden aber nicht anzeigt.

Damit werden auch alle Verzeichnisse/Unterverzeichnisse und deren Dateien angezeigt - probier's mal.

#!/usr/bin/perl
    print "Content-Type: text/plain\n\n";
    use strict;
    use warnings;
    use File::Find;
    
    @ARGV = 'C:' unless @ARGV;
    File::Find::find(\&list_files, @ARGV);
    
    sub list_files {
        my $found = $_;
        local $_;
        
        -d $found && print "$File::Find::dir\n";
        -f $found && do {
            my $last_mod = localtime((stat($found)) [9]);
            print "\t$found\t\t($last_mod)\n";
        };
    }

[louiggy]

@springmaker

Habe den Download jetzt über WinRAR probiert, bekam 2 Fehlermeldungen:

Unerwartetes Archivende
Das Archiv besitzt ein unbekanntes Format oder ist beschädigt

[gast0815]

Habe den Download jetzt über WinRAR probiert, bekam 2 Fehlermeldungen:
Unerwartetes Archivende
Das Archiv besitzt ein unbekanntes Format oder ist beschädigt

Kann ich so nicht bestätigen.
Hab's gerade nochmal runtergeladen ...
das Entpacken funktioniert sowohl mit WinRar als auch mit Winzip, ohne Probleme.

[Butterfisch]

Lieber Butterfisch, bekomme nach Download bei WinZip folgende Meldung:
"Datei kann nicht geöffnet werden, offenbar handelt es sich nicht um ein gültiges Archiv"
habe den Download auch über eine andere Seite "getätigt", mit dem gleichen Ergebnis, ((Hinweis dort, mich an den Autor zu wenden) woran liegt das?

Hi Louiggy,
kann ich so nicht nachvollziehen... Die hochgeladene Datei funktioniert bei mir.
Vielleicht wurde dein Download korrupiert... Versuchs doch nochmal...

[Butterfisch]

Damit werden auch alle Verzeichnisse/Unterverzeichnisse und deren Dateien angezeigt - probier's mal.

#!/usr/bin/perl
    print "Content-Type: text/plain\n\n";
    use strict;
    use warnings;
    use File::Find;
    
    @ARGV = 'C:' unless @ARGV;
    File::Find::find(\&list_files, @ARGV);
    
    sub list_files {
        my $found = $_;
        local $_;
        
        -d $found && print "$File::Find::dir\n";
        -f $found && do {
            my $last_mod = localtime((stat($found)) [9]);
            print "\t$found\t\t($last_mod)\n";
        };
    }

Danke, werd mal drüber nachdenken... Bisher war dieses Feature ja nicht gefordert... Mich würds ehrlich gesagt eher stören, wenn es darum geht, eine Dateiliste für Überwachungszwecke zu erstellen...

[gast0815]

Danke, werd mal drüber nachdenken... Bisher war dieses Feature ja nicht gefordert... Mich würds ehrlich gesagt eher stören, wenn es darum geht, eine Dateiliste für Überwachungszwecke zu erstellen...

War ja nur mal so hingeschrieben - und ist ja auch Perl und nicht VB
aber vielleicht kannst Du daraus doch ersehen, mit wie wenig Code man unter perl auskommen kann.

[Butterfisch]

Kam mir schon komisch vor... da ich aber noch auf dem Niveau von VB6 stehengeblieben bin, hab ich es für brauchbaren .net-Code gehalten...

Du wolltest mich also foppen....