Se utiliza FSO para realizar esos archivos
un ejemplo
Cita: function makefile(text)
DIM carpeta
DIM fso, NewsFile
carpeta =server.MapPath("./.")
archivo=carpeta & "\" & "" & text & ".txt"
response.Write archivo & "<br />"
response.Flush()
Set fso = CreateObject("Scripting.FileSystemObject")
if existe(archivo,fso)=false then
Set NewsFile = fso.CreateTextFile(archivo,True)
NewsFile.WriteLine("Escribiendo en una Linea")
for i=0 to 10
NewsFile.WriteLine i
next
NewsFile.Close
else
response.Write "no se ha creado nada<br />error de servidor<br />servicios ocupados<br />"
end if
set fso = nothing
end function
lo mandas llamar de esta manera
