<%@ language=VBscript %> <% myfile=Server.MapPath("counter_mysite.txt") Set fs=CreateObject("Scripting.FileSystemObject") Set a=fs.OpenTextFile(myfile) Hits=CLng(a.ReadLine) if Len(Session("Hits"))=0 then Session("Hits")=Hits Hits=Hits+1 a.close Set a=fs.CreateTextFile(myfile, True) a.WriteLine(Hits) end if a.Close %> poetinapoletani.it

Poeti Napoletani

 
S. Di Giacomo      
F. Russo
R. Bracco
E. Murolo
R. Viviani
L. Bovio
E.A. Mario
E. Nicolardi
G. Capurro
         		   
   Foto
   Poesie
   Contatti
   Collaborazioni
   Bibliografia
   Links utili
    Maringola
  

 

Poeti napoletani é una produzione PARTENOWEB