<% counter_file = Server.MapPath("test.txt") Set fs = CreateObject("Scripting.FileSystemObject") Set a = fs.OpenTextFile(counter_file) counter = Clng(a.ReadLine) if Session("counter") = "" then Session("ct") = counter counter = counter + 1 a.close Set a = fs.CreateTextFile(counter_file, True) a.WriteLine(counter) end if a.Close Response.Write counter %>

L'ARCEA

Les activités

Le calendrier

Les dossiers

Les voyages

sorties et visites

Les fiches d'information sur l'énergie

Les informations utiles

Le Bulletin de liaison ARCEA-CESTA

Les formations en informatique

Les liens

L'espace adhérents

Nouveautés :

Infos retraites

Au Fil des Jours n° 129 (8 décembre 2017) + CFR Échos n° 42 (novembre 2017)

??

Voyages

Circuit en Cantabrie

Programme et fiche d'inscription

Circuit Dans les Pays Baltes du 14 au 21/06/2018

Programme et fiche d'inscription

??

Assemblée annuelle de l'ARCEA-CESTA

Exposés et Album photos de l'assemblée annuelle

??

Séjours SKI

Voir le programme 2018

 

 

ATTENTION

Certains navigateurs empêchent l'accès à l'espace adhérents. Dans ce cas, il est conseillé de faire un essai avec un autre navigateur (Firefox, Safari, par exemple)

Écrivez-nous