<% Dim nomefile, filestream nomefile = Server.MapPath("public/visite.txt") Set objFile = CreateObject("Scripting.FileSystemObject") 'se il file non esiste, crealo if not objFile.FileExists(nomefile) then Set filestream = objFile.OpenTextFile(nomefile, 2, true) filestream.WriteLine("0") end if 'legge il numero attuale di visite Set filestream = objFile.OpenTextFile(nomefile, 1, true) Dim visite visite = filestream.ReadLine() filestream.Close 'se non č ancora presente la variabile di sessione if Session("visiting")<>1 then Session("visiting") = 1 'crea la variabile di sessione visite = visite + 1 'incrementa di uno gli accessi al sito end if 'scrive nel file il valore aggiornato di visite Set filestream = objFile.CreateTextFile(nomefile, true) filestream.WriteLine(visite) filestream.Close Set filestream = Nothing Set objFile = Nothing %>

  

Benvenuti !  Welcome ! Wilkommnen ! Bienvenus !

italy-s(1).gif (138 byte)

Ol Giopė e la Margė ti presenta le sue proposte di menu, con piatti tipici Bergamaschi
e tantissimi altri piatti.  In lingua Italiana.
 

 

Ol Giopė e la Margė is presenting you some menus, with specialties from Bergamo and much more. In English.
 

 

Ol Giopė e la Margė te presente ses menus, ses plats de la tradition Bergamasque et plein d'autres bonnes choses. En Franįais
 

 

German version under design - Danke schön.
 

Il ristorante Ol Giopė e la Margė Partecipa a:
 


I GIOPPINI GRUPPO 
FOLKLORISTICO
NAZIONALE



ISABELLA PLEBANI
A CANALE 5 A  MEZZO GIORNO DI CUOCO

 

Numero Visite: <%Response.Write visite %>