momo, si lo único que quieres es saber cuantos archivos tienes sólo copia este código:
Código:
<%
Dim FILE_FOLDER, oFS, oFolder
'Pon el path que corresponde a tu archivos aqui
FILE_FOLDER = Server.MapPath(".") '<----
Set oFS = Server.CreateObject("Scripting.FileSystemObject")
Set oFolder = oFS.getFolder(FILE_FOLDER)
response.write "cant_archivos=" & oFolder.Files.Count
%>
Suerte