% 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 | |
Copertina | __ | |
Decreto Dirigenziale n. 63 del 27 luglio 2005 Rettifica Bando Pubblico relativo ai progetti Integrati dei Parchi Regionali Settore Piccola Recettività (Decreto Dirigenziale n. 51 del 21.06.05) e rettifica Bando Pubblico relativo ai Progetti Integrati dei Parchi Regionali Settore Artigianato Commercio e Servizi (Decreto Dirigenziale n. 50 del 21.06.05) | __ |
Documenti |
tipo | |
Decreto
Dirigenziale n. 50 del 21 giugno 2005 Bando per la concessione dei contributi previsti dal P.O.R. 2000/2006 Asse prioritario di riferimento 1 - Risorse Naturali-Azione a) - Misura 1.10. P.I. Parchi Regionali Settori Artigianato, Commercio e Servizi. | __ | |
Bando N.B. il presente bando tiene conto delle rettifiche apportate con decreto Dirigenziale n. 63 del 27 luglio 2005 | __ | |
Definizione di Piccola e media impresa | __ | |
Domanda | ||
Formulario N.B. il presente formulario tiene conto delle rettifiche apportate con decreto Dirigenziale n. 63 del 27 luglio 2005 | ||
Schema Referenze Bancarie | ||
Schema Perizia | ||
Schema Dichiarazione Proprietario Immobile |
Documenti |
tipo | |
Decreto
Dirigenziale n. 51 del 21 giugno 2005 Bando per la concessione dei contributi previsti dal P.O.R. 2000/2006 Asse prioritario di riferimento 1- Risorse Naturali - Azione a) - Misura 1.10. P.I. Parchi Regionali Settore Piccola Ricettività Turistica. | __ | |
Bando | __ | |
Definizione di Piccola e media impresa | __ | |
Domanda | ||
Formulario | ||
Schema Referenze Bancarie | ||
Schema Perizia | ||
Schema Dichiarazione Proprietario Immobile |