Lettura contenuto cartelle su server

[Mems]

...
Next 
  if numfile > 0 then
   response.Write ("Numero di file presenti : " & numfile) 
  else
  Response.Write ("Nessun file per la cartella selezionata.")
  end if
end if