'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" %>