Scusate sempre io... ho un codice che con il metodo FSO legge cartelle, sottocartelle e files contenuti in una directory di un server in remoto.

Il problema che su qualcuna di queste cartelle è stato caricato un file chiamato thumbs.db che vorrei escludere dalla lista dei files visualizzati a video, ma non ci riesco:
codice:
 'CONTROLLA ESISTENZA FILE
if objFiles.Count = 0 Then 
Response.Write ("
[b]<font size=""1"" face=""Verdana"">Nessun file per la cartella selezionata
") 
else
 
*********
 
numfile = 0
For each directoryfile in objFolder.files 
numfile = (numfile + 1)
 
response.write ("<tr>")
response.write ("<td><a href="""&percorso&"/"&directoryfile.Name&""">")
ext=right(directoryfile.Name,3)

nome = left(directoryfile.Name, 22)

select case ext 
case "pdf","asp","htm","mdb","xls","ppt","doc","txt","dwg" %>
[img]images/<%= ext %>.jpg[/img]
<% case else %>
[img]images/unk.jpg[/img]
<% end select %><% =nome %></a><%
response.write ("</td>") 
response.write ("<td>" & directoryfile.Size & "</td>")
response.write ("<td>" & directoryfile.Type & "</td>") 
response.write ("<td>" & directoryfile.DateCreated & "</td>") 
response.write ("<td>" & directoryfile.DatelastModified & "</td>")
 
Next 
response.Write ("
Numero di file presenti : " & numfile) 
end if
 
Set objFso = Nothing