% ip = Request.ServerVariables("REMOTE_ADDR") set db=server.createobject("adodb.connection") islem="DRIVER={MICROSOFT ACCESS DRIVER (*.mdb)};" islem=islem & "DBQ=" & Server.mappath("vt2.mdb") db.open islem set rs = server.createobject("adodb.recordset") sql="select * from hit " rs.open sql,db,1,3 rs.addnew rs("ip")=ip rs("tar")=now() rs.update Rs.Close Set Rs=Nothing db.Close Set db=Nothing %>