de asp a txt

[maestro]

'Crear Ficheros y comprobar si ya existen
If fso.FileExists (Server.MapPath("/directorio/prueba.txt")) Then
response.write("ya existe")
else
set oFich = FSO.CreateTextFile ( Server.MapPath("/direcotorio/prueba.txt"), True )
response.write("Se ha creado el fichero & ofich")
end if

'Añadir lineas a un fichero
set oFich = FSO.OpenTextFile(Server.MapPath("/directorio/prueba.txt"), 8)
'8=ForAppending Abre un archivo y escribe al final del mismo.
oFich.WriteLine ("Esta es la nueva línea que hemos añadido.")
oFich.Close
set oFich = nothing

'Crear carpetas
fso.createfolder (server.mappath("/directorio/carpeta"))

'Borrar carpetas
fso.deletefolder (server.mappath("/directorio/carpeta"))

Naturalmente necesitas permisos de escritura en esa carpeta y de ejecucion de scripts.