::: Bimares :::

<% on error resume next filecontatore= server.MapPath("/public/contatore.txt") Set fs = CreateObject("Scripting.FileSystemObject") Set apro = fs.OpenTextFile(filecontatore) quanti = Clng(apro.ReadLine) quanti = quanti + 1 apro.close Set apro = fs.CreateTextFile(filecontatore,True) apro.WriteLine(quanti) apro.Close 'response.write "La pagina ha recibido "& hits & " visitas" %>





:: PRESENTACION :: ACTIVIDADES :: GALERIAS :: CONTACTO :: PATROCINADORES :: FORO :: ENLACES :: INSCRIPCIONES :: NUESTRA PIZARRA