>Hello Everybody
>
>I have a cursor with filenames + path as result from an recursive directory scan.(all subfolders)
>
>I do a scan to get some file attributes.
>SELECT (thisform.l_cursor)
>
>l_FSO = CREATEOBJECT("Scripting.FileSystemObject")
>
>SCAN
>
> l_FileName = ALLTRIM(path)+ALLTRIM(filename)
> l_File = l_FSO.GetFile(l_FileName)
> replace geaendert WITH l_File.DateLastModified
> replace gelesen with l_File.DateLastAccessed
> replace angelegt WITH l_File.DateCreated
>
>endscan
>
>Normaly everything works as expected.
>But for some files in my cursor i get an error
>OLE Error Ox800a0035 Unkown COM Status ???
>
>The releated files looks normal for example: (d:\myfiles\album2\xyz.mp3)
>I can repeat this error. Scanning all files in d:\myfiles will allways crash with d:\myfiles\album2\xyz.mp3.
>In other directories my code crashes at some other files.
Hi Albert
Have look at download#
25487. It is pure fox class which reads folders and their subfolders.
HTH
Sergio