% function getThisPage() Dim sPath Dim lLastSlashPosition Dim sCurrPage Dim lPathLength sPath = Request.ServerVariables("PATH_INFO") lLastSlashPosition = instrrev(sPath, "/") lPathLength = len(Request.ServerVariables("PATH_INFO")) getThisPage = right(sPath, (lPathLength-lLastSlashPosition)) end function %> <% on error resume next Dim pathCounter Dim filecounter Dim myfile Dim visita pathCounter="/public/" filecounter = pathcounter & getthispage() & ".txt" myfile=server.mappath(filecounter) Set fs=CreateObject("Scripting.FileSystemObject") if fs.fileExists(myfile) then Set a=fs.OpenTextFile(myfile) visita=Cdbl(a.ReadLine) else Set a=fs.CreateTextFile(myfile, False) a.WriteLine("0") visita=0 end if a.close if Len(Session(filecounter))=0 then Session(filecounter)=visita visita=visita+1 Set a=fs.CreateTextFile(myfile, True) a.WriteLine(visita) a.Close end if set fs = nothing %>
Documenti |
tipo
|
MB
|
Deliberazione 286 del 25 febbraio 2005 |
--
|
|
Linee Guida per la Pianificazione Regionale 18 ottobre 2002, n. 26 - D.G.R. n. 4459 del 30.09.2002. Integrazioni |
1.2
|
Documenti |
tipo
|
MB
|
Deliberazione 287 del 25 febbraio 2005 |
--
|
|
Proposta di Piano Territoriale Regionale |
1.7
|
|
Allegati | ||
1 - Definizione dei concetti utilizzati nei diversi quadri territoriali di riferimento |
--
|
|
2 - L'eredità della Pianificazione Territoriale in Campania |
--
|
|
3 - Forme istituzionali di aggregazione sovracomunali presenti in Campania e principali esperienze di altre Regioni |
2.7
|
|
4 - Confronti tra STS proposti e delimitazioni sovra-comunali vigenti |
17
|
|
5 - Schede demografiche per STS |
5.2
|
|
6 - Tabelle sugli STS |
--
|