premetto subito che sto lavorando dentro la cartella public

uso queste righe:

percorso = "/public/data1/archive/"
Set FSO = CreateObject("Scripting.FileSystemObject")
Upload1 = True
DimensioneFile1 = len(ContenutoFile)
EstensioneFile1 = right(ContenutoFile,3)
NomeFile1 = NomeFile
Set textStream = FSO.CreateTextFile(Server.MapPath(percorso & NomeFile1), True, False)
textStream.Write ContenutoFile
textStream.Close
Set textStream = Nothing
Set FSO = Nothing

la risposta del browser:
Microsoft VBScript runtime error '800a0046'

Permission denied

/sub1/sub2/memorizza.asp, line 113

La riga 113 č quella in rosso
ho da pochissimo migrato il sito dal mio server a quello di Aruba.
Questa struttura ha sempre funzionato.
cosč che mi sfugge?