fso.createfolder (errore)

[agenti]

<%
Dim percorso
percorso="file/dati_" & date()
Set fso = CreateObject("Scripting.FileSystemObject")
if fso.FolderExists(Server.MapPath(" "&percorso&" ")) then

response.write "dir_ok"
else

'creo la directory con data di oggi

Dim fso,g,data_oggi

response.write percorso
response.end

Set fso = CreateObject("Scripting.FileSystemObject")
Set g = fso.CreateFolder(Server.MapPath(" "&percorso&" "))

response.write "dir creata"
end if
response.end
%>

errore:

Impossibile trovare il percorso
/upload_include.asp, line 17

[Roby_72]

percorso="/file/dati_" & date()

Set g = fso.CreateFolder(Server.MapPath(percorso))

Roby

[agenti]

ho semplificato ancora...

<%
Dim percorso
percorso="file/dati_" & date()

'creo la directory con data di oggi

Dim fso,g,data_oggi

response.write percorso


Set fso = CreateObject("Scripting.FileSystemObject")
Set g = fso.CreateFolder(Server.MapPath(percorso))

response.write "dir creata"
response.end
%>
non va in errore
ma non crea la directory.

se scrivo
percorso="file/dati_"

crea la directory.

[michele.santoro]

Forse dico una c....ta, ma prova a fare un replace.
I nomi di cartelle non possono contenere i caratteri "/".
Prova a fare

<% 
Dim percorso, data, fso, g
data= date()
data= Replace ( data, "/", "_" )

percorso="file/dati_"& data 

'creo la directory con data di oggi 

'Dim fso,g,data_oggi 

response.write percorso 

Set fso = CreateObject("Scripting.FileSystemObject") 
Set g = fso.CreateFolder(Server.MapPath(percorso)) 

response.write "dir creata"
response.end 
%>

[agenti]

ebbravo micheluzzo

grazie.

[michele.santoro]

De nada!