compter le nombre de visiteur d'un site

'libDb.asp:
<%
Dim Conn : Set Conn = CreateObject("ADODB.Recordset")
Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("\tabase.mdb") & ";User Id=admin;Password=;"
%>

'libUsersLogging.asp:
<!--#include file="libDb.asp" -->
<%
Conn.Execute "UPDATE Stats SET Ct=Ct+1;"
Conn.Execute "INSERT INTO UsersLog(IP) VALUES('" & Request.ServerVariables("REMOTE_ADDR") & "');"
%>

'taPage.asp:
<!--#include file="libUsersLogging.asp" -->
<% Response.Write "HELLO WORLD" %>