% Response.Expires = 0 Set fs = CreateObject("Scripting.FileSystemObject") Path = "d:\inetpub\webs\civitanovesecalcioit\public\conta.txt" Set a = fs.OpenTextFile(path) conta = a.ReadLine a.Close %>