[CODE]
fileCount = fso.GetFolder(myDir).Files.Count _
- fso.GetFolder(myDir).Files.vbHidden.Count
[/CODE]