how to scan for a certain folder name

[GstRdr1]

I need to scan subfolders for a certain folder name. and then move that folder to an archive directory. I was planning to use the dirListbox to select the parent directory and scan for the folder. Is this the right approach? Or is there a better way to scan a directory for a certain folder and move it to an archive directory. All folders are on the local drive. Thanks in advance

Marc
MCP -WinXP
-Win2k Server

 

[FRoeCassNet]

A very quick and dirty approach is:

Dim fso As FileSystemObject

On Error Resume Next
Set fso = New FileSystemObject
fso.MoveFolder "c:\test\Foo", "c:\test\archive\"
Set fso = Nothing


Then the MoveFolder method will fail (error 76, path not found) if the folder doesn't exist. And will fail (error 58, File already exists) if the folder already exists in the archive folder. You just have to make sure you account for these errors appropriately.