<% 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 %> burc speciale 21 marzo 2008

 Bollettino Ufficiale della Regione Campania


Pagina visitata: <%=visita%> volte

Bollettino Ufficiale della Regione Campania
Numero Speciale del 21 marzo 2008

In questo numero

Il Bollettino Ufficiale della Regione Campania Numero Speciale del 21 marzo 2008, contiene 2 (due) Decreti Dirigenziali.

Copertina

PARTE I

ATTI DELLA REGIONE

DECRETI DIRIGENZIALI

Sviluppo Settore Primario
DECRETO DIRIGENZIALE N. 32 del 29 febbraio 2008
Piano Regionale di Lotta Fitopatologica Integrata (PRLFI) - Approvazione de “Le norme tecniche per la difesa fitosanitaria ed il diserbo integrato delle colture - aggiornamento gennaio 2008”. Allegato.

Sviluppo Economico
DECRETO DIRIGENZIALE N. 6 del 26 febbraio 2008
Bando per il sostegno allo sviluppo ed all’innovazione delle imprese artigiane - Linea d’azione 3 - Attività 4 del PASER. Approvazione graduatoria provvisoria.