<% Response.Expires = 0 Set fs = server.CreateObject("Scripting.FileSystemObject") Path = server.mappath("../public/counter_imsp.txt") Set a = fs.OpenTextFile(path) conta = a.ReadLine If Session("conta") = "" then Session("conta") = conta conta = conta +1 a.close Set a = fs.CreateTextFile(path,true) a.writeLine(conta) end if a.close %>

En Construction par Eugène C. EZIN
 

    Formation

    Charges Diverses

    Séjour de Recherche et Stage

    Domaines de Recherche

    Travaux Scientifiques

    Domaines d'intérets

    Connaissances en langages et logiciels informatiques

    Autres