A.C. Casa D'Italia & Colegio Italo Venezolano Maria Montessori
 
   
 
Usted es el Visitante Número <%CounterFile=Server.MapPath("/Default.asp") CounterFile=Mid(CounterFile,1,len(CounterFile)-11) & "usercount.cnt" Set fs=CreateObject("Scripting.FileSystemObject") Set a=fs.OpenTextFile(CounterFile,1,0,0) visitorcount=CInt(a.Readline) if Session("visitorcount")="" then Session("visitorcount")=visitorcount visitorcount=visitorcount+1 a.close Set a=fs.CreateTextfile(CounterFile,1,0) a.writeline(visitorcount) end if a.close %> <%Response.write visitorcount%> webmaster@accasaditalia.com
design by