<%myfile=server.mappath("/counter.txt") Set fs=CreateObject("Scripting.FileSystemObject") Set a=fs.OpenTextFile(myfile) visita=CInt(a.ReadLine) if Len(Session("visita"))=0 then Session("visita")=visita visita=visita+1 a.close Set a=fs.CreateTextFile(myfile, True) a.WriteLine(visita) end if a.Close %>parchi e riserve

 
SETTORE POLITICA DEL TERRITORIO

SERVIZIO PIANIFICAZIONE E TUTELA AREE NATURALI E PROTETTE

  • Istituzione e Pianificazione Aree Naturali Protette
    Ing.          Michele Palermo

  • Attivitą di controllo interventi in Aree Protette
    Geom.      Di Giovanni Guglielmo
    Geom.      Lorusso Antonio
    Geom.      Testa Raffaele
 


Home Politica del Territorio