<%Set Conn = Server.CreateObject("ADODB.Connection") Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("db/logg.mdb") Ip = Request.Servervariables("REMOTE_ADDR") Conn.Execute("Insert Into logg(Ip) Values('"& Ip &"')") Conn.Close Set Conn = Nothing%>