这个是同ＩＰ段在同一天中只记录一次的，因为网上找的统计代码的花样太多，所以想自己写个简单点的，可是写到这就写不下去了，请各位老大指教．

按当前日期及已有数值(SIPThree)查询数据库，如果查询到则不做处理，如果没有查询到则将SIPThree的值写入IP字段中，请问该怎么写，最好给注译了哪一句是什么意思，谢谢

表结构:
表名addip
id IP 　　　　　 logtime
1 127.0.0　　　　2006-08-08
2 192.168.1　　　2006-08-09

[此贴子已经被作者于2006-8-9 23:05:33编辑过]

楼上的大哥谢谢你，用你的总提示我错误，改了好久都没搞定

现在是不论数据库内在同一天中有没有目前访问的者的ＩＰ都会新加上一条记录

假设目前的访问者ＩＰ是127.0.0，而查询得到数据库内当前日期表ＩＰ如果已经有127.0.0了，那就不再往里写东西了，如果当前日期没有这个访问者的ＩＰ，则把这个新的ＩＰ写入数据库

我把整页的代码都写上了，再帮我改改吧,

<!--#include file="conn.asp"-->
<%
'---------ip
dim mIPAddr,nIPNum,sIPOne,sIPTwo,sIPThree,strSql,rs,adOpenStatic,adLockOptimistic,adCmdText,IPThree,sql,logtime
mIPAddr = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If mIPAddr = "" Then
mIPAddr = Request.ServerVariables("REMOTE_ADDR")
end if   


  nIPNum=Split(mIPAddr,".")   
  sIPOne=nIPNum(0)                                                             '首段   
  sIPTwo=nIPNum(0)&"."&nIPNum(1)                                 '前两段   
  sIPThree=nIPNum(0)&"."&nIPNum(1)&"."&nIPNum(2)'前三段   



strSql="SELECT IP,logtime FROM addip WHERE IP='"&SIPThree&"' AND logtime="&cstr(int(now()))
set rs=server.createobject("adodb.recordset")
rs.open strsql,conn,1,3
IF rs.bof or rs.eof THEN
    rs.AddNew
    rs("IP")=SIPThree
    rs("logtime")=int(now())
    rs.Update()
end if
   %>

谢谢几位热心的老大，问题解决了．

ＩＰ用模糊查询就好用了．

我不会加分，只能说声谢谢了

[此贴子已经被作者于2006-8-16 12:21:53编辑过]