Crea folder permesso negato

[minnie71]

Ciao,
ho scritto il seguente codice:

'Controllo se esiste il percorso e la cartella
if fso.folderExists(path) then
   'Tutto ok
else
   'Devo creare la cartella con  nome = sCodice
   dim sNuovaDir 
   set sFile =CreateObject("Scripting.FileSystemObject") 
   sNuovaDir = sFile.CreateFolder(Server.Mappath("/" & sCodice))
   Response.Write ("sNuovaDir " & sNuovaDir & "
")
   set sFile=nothing
end if

il problema sta che la cartella creata non ha gli accessi. come faccio?

grazie :master:

[Roby_72]

Li devi impostare.
Sei sul server o in locale?

Roby

[minnie71]

sarà sul server. il path sarà: path = "c:\Inetpub\wwwroot\CTB_FILES\" & sCodice & "\"

[santino83]

ti devi far settare dagli amministratori del server i permessi di scrittura sulla cartella CTB_FILES e figli

[minnie71]

impossibile, quando creo un documento controllo che sul server ci sia già la sua cartella altrimenti la creo io via codice.

[santino83]

i figli li puoi creare te...però ctb_files deve avere i permessi di scrittura

[minnie71]

CTB_FILES ha già i permessi, ma i figli come faccio a darglieli in automatico i permessi?