<% LogFileDate = Date LogFileName = "" If Month(LogFileDate) < 10 Then LogFileName = "0" End if LogFileName = LogFileName & Month(LogFileDate) If Day(LogFileDate) < 10 Then LogFileName = LogFileName & "0" End If LogFilName = "" & LogFileName & Day(LogFileDate) & Year(LogFileDate) & ".log" Set fs = CreateObject("scripting.FileSystemObject") Set a = fs.OpenTextFile(server.MapPath(LogFileName), 8, True, False) if request.ServerVariables("HTTP_REFERER")<= "" Then Request.ServerVariables("HTTP_REFERER") = 0 else a.Write("Dernier Site:" & Request.ServerVariables("HTTP_REFERER")) a.Write("adresse IP:" & Request.ServerVariables("REMOTE_ADDR")) & VBcrlf end if %> Conception SQLog

Sites Internet à la demande

En dehors des sites types suivants

Sites «Evènementiels»

Ces sites concernent vos évènements importants ou ceux d'un proche (mariages, naissances, anniversaires etc )

Sites «Compagnons»

Ces sites concernent vos compagnons (chiens, chats, chevaux etc ). Ils intéressent les particuliers comme les professionnels

nous pouvons concevoir, voire même héberger, tout site Internet correspondant à vos besoins ou vos désirs. A titre d'exemple, vous pouvez visiter le site de Chany. Pour tout projrt et/ou devis, merci de nous contacter.

le site de Chany