Skinny site

Un modo semplice per scriversi un file di testo in asp.

---

Dim fso, fl, pth
'Recupera il percorso fisico del sito
pth = Request.ServerVariables("APPL_PHYSICAL_PATH")
Set fso = CreateObject("Scripting.FileSystemObject")
Set fl = fso.CreateTextFile(pth & "\msgLog\log.txt", True)
fl.write(CStr(Now()))
fl.writeline("")
fl.write("input:")
fl.writeline("")
fl.write("Flusso dati")
fl.Close
Set fso = Nothing