Creare file txt in cartella con permessi

[Enrique_Rojas]

Perchè mi viene negata la scrittura sulla cartella public di un server aruba quando cerco di creare un file txt?

<%
Dim path, nome, completo 
path="D:\Inetpub\webs\miapaginaweb\public" 
nome="FileTesto.txt" 
completo=path & nome 
Dim fso, file 
Set fso = CreateObject("Scripting.FileSystemObject") 
IF fso.FileExists(completo)=true THEN 
ELSE 
Set file = fso.CreateTextFile(completo) 
file.WriteLine("Questa è una prova.")
file.Close 
END IF 
Set file=Nothing 
Set fso=Nothing 
%>

[Roby_72]

path = server.MapPath("/public/")

Roby

[Enrique_Rojas]

gracias!

[Enrique_Rojas]

scusa Roby, ma se il file txt devo aggiornarlo con nuovi elementi, come faccio? :master:

[Roby_72]

Lo apri, lo modifichi e lo risalvi.

Roby

[Enrique_Rojas]

esempio?

[Roby_72]

http://www.w3schools.com/asp/met_opentextfile.asp

Roby

[Enrique_Rojas]

restituisce errore su questa riga:

f.WriteLine("&request("username")&")

Microsoft VBScript compilation error '800a03ee'

Expected ')'

:master: In sostanza devo scrivere una cosa del genere:

utente = request("username")

dim fs,f
set fs=Server.CreateObject("Scripting.FileSystemObject")
set f=fs.OpenTextFile(Server.MapPath("/public/listaMesseger.txt"),8,true)
f.WriteLine("&request("username")&")
f.Close
set f=Nothing
set fs=Nothing

[Roby_72]

f.WriteLine(request("username"))

Roby

[Enrique_Rojas]

ok adesso funziona, grazie; un'ultima cosa non riesco a scrivere più informazioni sulla stessa riga del file txt:

f.WriteLine(utente - ip)