Vuoi dire che inserisce anche quelli da escludere?
Rimetti gli and e prova così, solo per vedere cosa scrive:
codice:
if objFiles.Count = 0 Then 
Response.Write ("
[b]<font size=""1"" face=""Verdana"">Nessun file per la cartella selezionata
") 
else
Response.Write objFiles.Count & "
"
...