script ke si accorge di quanti file sono in 1 directory

[bronz]

salve a tutti!!

Secondo voi.....

esiste 1 script ke si accorge di quanti file sono in 1 directory?



o, è una pretesa assurda per asp?

grazie!

[Cream]

<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set folderObject = fso.GetFolder(Server.MapPath("\tuacartella\"))
Set filesObject = folderObject.Files
i=0
For Each file In filesObject
i=i+1
Next
response.write "sono presenti: "& i & " files uploadati!"
Set fileObject = Nothing
Set folderObject = Nothing
Set fso = Nothing
%>

[bronz]

lo provo subito!!!
tanx!

[bronz]

sembra che non funzioni!!!

[Cream]

a me questo che ho provato adesso funziona..

<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set folderObject = fso.GetFolder(server.MapPath("/writable/"))
Set filesObject = folderObject.Files
i=0
For Each file In filesObject
i=i+1
Next
response.write "sono presenti: "& i & " files uploadati!"
Set fileObject = Nothing
Set folderObject = Nothing
Set fso = Nothing
%>

controlla bene il percorso

[bronz]

vi posto il codice mi date una mano?

<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set folderObject = fso.GetFolder(Server.MapPath("images"))
Set filesObject = folderObject.Files
i=0 
For Each file In filesObject
i=i+1 
Next 

response.write "sono presenti: "& i & " files uploadati!"
Set 
fileObject = Nothing
Set folderObject = Nothing
Set fso = Nothing 
%>

tutto questo nel body?

[deleted_c]

Originariamente inviato da Cream
a me questo che ho provato adesso funziona..

<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set folderObject = fso.GetFolder(server.MapPath("/writable/"))
Set filesObject = folderObject.Files
i=0
For Each file In filesObject
i=i+1
Next
response.write "sono presenti: "& i & " files uploadati!"
Set fileObject = Nothing
Set folderObject = Nothing
Set fso = Nothing
%>

controlla bene il percorso

<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set folderObject = fso.GetFolder(server.MapPath("/writable/"))
response.write "sono presenti: "& folderObject.Files.Count & " files uploadati!"
Set folderObject = Nothing
Set fso = Nothing
%>

forse anche

<%
Set fso = CreateObject("Scripting.FileSystemObject")
response.write "sono presenti: "& fso.GetFolder(server.MapPath("/writable/")).Files.Count & " files uploadati!"
Set fso = Nothing
%>

[Cream]

si nel body....

però devi controllare questa riga:

(server.MapPath("/writable/"))

se vuoi essere sicuro non mettere lo script e fatti solo stampare a video il percorso della cartella dove vuoi cotnare...

<%=(server.MapPath("/writable/"))%>

e vedi se è giusto il percorso

[bronz]

in questa riga dove

Set folderObject = fso.GetFolder(server.MapPath("/writable/"))

al posto di /writable/ devo mettere la cartella che contiene i file
vero?!!?

[bronz]

la cartella si chiama images
quindi scrivero' images, ma non funz