Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Problem bei vbarchiv-Beispiel: "Dateien suchen"
Autor: horst
Datum: 22.04.04 11:26
Hallo Dieter, ich habe bisher diesen Code auch problemlos benutzt, dann fügte ich eine allgemeine Fehlerreaktion ein, und ich hatte nachfolgendes Problem (Error 52). Die Ursache scheint folgende zu sein: Es gibt Folder, in denen SubFolder.Namen mit SubFolder.Name = <Objectvariable oder With-Blockvariable nicht festgelegt> vorkommen. “C:\System Volume Information\” in WindowsXP ist z.B. ein solcher. Bei ungeeigneter Error-Handler-Einstellung steigt die Suchroutine an dieser Stelle mit Err.Number=52 („Dateiname oder –nummer falsch“) aus. Die ganze Sucherein in On Error Resume Next ….. Err.Clear löst das Problem Private Sub FSO_SearchFile(ByVal sPath As String, _ ByVal sFileToSearchFor As String) ' einzelnen Ordner durchsuchen Dim Folder As Folder Dim SubFolder As Folder ' Ggfs. abschließenden Backslash anfügen If Right$(sPath, 1) <> "\" Then sPath = sPath & "\" Set Folder = oFSO.GetFolder(sPath) If Dir(sPath & sFileToSearchFor) <> "" Then ' Datei im Ordner gefunden ' --> Pfad an Me.sPathExe übergeben, das ist globale Variable zur Weiterverarbeitung sPathExe = sPath End If ' Ggfs. Fehler "Zugriff verweigert" ignorieren On Error Resume Next ' Unterordner If Folder.SubFolders.Count > 0 Then For Each SubFolder In Folder.SubFolders ' Hier wird die Funktion REKURSIV aufgerufen, ' um alle weiteren Unterordner des SubFolders ' zu ermitteln FSO_SearchFile sPath & SubFolder.Name, _ sFileToSearchFor Next End If Err.Clear End Sub Nun geht's wieder problemlos! Gruß horst

Problem bei vbarchiv-Beispiel: "Dateien suchen"	143	mahir	28.07.03 17:51
Re: Problem bei vbarchiv-Beispiel: "Dateien suchen"...	817	Dieter	28.07.03 18:24
Re: Problem bei vbarchiv-Beispiel: "Dateien suchen"...	82	mahir	29.07.03 08:46
Re: Problem bei vbarchiv-Beispiel: "Dateien suchen"...	781	Dieter	29.07.03 09:12
Re: Problem bei vbarchiv-Beispiel: "Dateien suchen"...	157	mahir	29.07.03 12:31
Re: Problem bei vbarchiv-Beispiel: "Dateien suchen"...	918	horst	22.04.04 11:26

Sie sind nicht angemeldet! Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden. Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  Gesamtübersicht

Suchen