problema con file di testo

[gold]

<% 
Set fs = server.CreateObject("Scripting.FileSystemObject") 
Set a = fs.CreateTextFile("D:\inetput\wwwroot\testfile.txt", True) 
%>