Oprette txt-filer i en bestemt mappe

Eks;¨

<%
filNavn = server.Mappath("/folder/folder/fil.txt")
Set fs=Server.CreateObject("Scripting.FileSystemObject")
Set fo=fs.GetFolder(filNavn)
Set tfile=fo.CreateTextFile("test.txt",false)
tfile.WriteLine("Hello World line 1!")
tfile.WriteLine("Hello World line 2!")
tfile.WriteLine("Hello World line 3!")
tfile.Close
set tfile=nothing
set fo=nothing
set fs=nothing
%>

Hvis det her virker, har du lige reddet min jul !!!
Er ikke sikker på at jeg når at teste det i dag -og jeg smutter desværre på juleferie idag, men så snrt jeg er tilbage er jeg der...

Glædelig jul :-)

hehe dårlige eks ser jeg lige brug dette:
Du skal lige vide den kan ikke oprette en folder selv så hvis man har folderen
/xxx og vil laven en ny text fil i /xxx/yyy/test.txt og /xxx/yyy folderen ikke finden skal man først oprette folderen yyy og så text filen..

<%
filNavn = server.Mappath("/folder/folder/fil.txt")
Set fs=Server.CreateObject("Scripting.FileSystemObject")
set tfile=fs.CreateTextFile(filNavn)
tfile.WriteLine("Hello World line 1!")
tfile.WriteLine("Hello World line 2!")
tfile.WriteLine("Hello World line 3!")
tfile.Close
set tfile=nothing
set fs=nothing
%>