Arbeiten mit Ordnern

[Goldman]

Hallo
Ich habe ein kleines Problem.
Mit meinem Programm soll ich alle Unterordner in einem Hauptordner kopieren.
Von diesen Hauptordnern existieren 2 Stück.
Nun soll dies auch funktionieren, wenn man auf Unterordner in einem Hauptordner keine Rechte hat.
Bei mir erscheinen nämlich Zugriffsfehler und das Programm bricht ab.
kann mir dabei jemand helfen

 

[Retlaw]

Stichwort Fehlerbehandlung

Versuchs mal mit einer Fehlerbehandlung, so in der Art:

sub irgendwas()
on error goto errHandler
'Hier kommt dein Code rein
exit sub 'wichtig bei Fehlerbehandlung!
errHandler:
if err.number=X then 'für x die Fehlernummer einsetzen die immer kommt
...'ordner mit zugriffsverletzung ignorieren
...'sub neustarten
end if
end sub

oder falls es keine rekursive Funktion zum durchsuchen des Ordners ist gehts auch mit "on error resume next" am anfang, ist aber nicht so sauber weil dann einfach alle Fehler ignoriert werden.

 

[Goldman]

Danke Retlaw.
Leider wird bei mir weder Fehlermeldung (err.description) noch Fehlernummer (err.number) angezeigt.

 

[Retlaw]

Wie äußert sich denn der Fehler dann bei deinem ursprünglichen Programm ?
Wie versuchst du die Datei zu kopieren (code) ?

Hab sowas unter WinNT 4.0 ausprobiert und wenn ich dem Unterordner alle Rechte entziehe und versuche mit VB daraus eine Datei zu kopieren erhalte ich Fehler 75: Path/File access error.
Diesen Fehler kann man auch mit der oben beschriebenen Methode abfangen.