What I'm trying to do is delete all files in a folder. This code works except it locks up on a file called thumb.db. Everything else deletes. I don't see thumbs.db in the folder any ideas on how to fix?
Dim aflle As File
Dim afolder As Folder
Set afolder = fs.GetFolder(DLookup("CdfExportLocation", "tSetDefaults"))
For Each afile In afolder.Files
If IsNull(afolder) Then