一个邪门的程序

welru 2009-04-11 02:47:27
我写了一个程序,用来统计网站中某个关键词的搜索情况.其中有统计搜索次数.但是每次搜索次数的字段都自动加1.比如说,第一次搜索是1,但它的值却是二.
代码:

Set objRs = Server.CreateObject("ADODB.RECORDSET")
objRs.Open "Select * From [Sys_SurchInfos] Where (Keyword = '"&Keyword&"' AND SurchType = '"&SurchType&"' And FromUrl = '"&FromUrl&"' And Ver = '"&Ver&"')",objConn,1,3
If objRs.Eof and objRs.Bof Then
objRs.Addnew
objRs("Keyword") = Left(Keyword,100)
objRs("ReturnNum") = ReturnNum
objRs("SurchNum") = 1
objRs("Ver") = Ver
objRs("SurchType") = SurchType
objRs("InputTime") = Now()
objRs("ReNewTime") = Now()
objRs("FromUrl") = FromUrl
objRs.Update
Else
objRs("SurchNum") = objRs("SurchNum")+1
objRs("ReNewTime") = Now()
objRs("ReturnNum") = ReturnNum
objRs.Update
End If

objRs.Close
Set objRs = Nothing

以上这些是写在一个过程里的,根据我的测试 ,我发现这个过程每次都自动执行了两次.
...全文
143 8 打赏 收藏 转发到动态 举报
写回复
用AI写文章
8 条回复
切换为时间正序
请发表友善的回复…
发表回复
htl258_Tony 2009-04-15
  • 打赏
  • 举报
回复
关注.
welru 2009-04-15
  • 打赏
  • 举报
回复
从站外进来的不会产生这个问题.比如从百度进来的话就不会.
wlkjhxd 2009-04-15
  • 打赏
  • 举报
回复
看代码应该是不这个页面的问题,估计还时别的问题导致了多刷新了一次,好好的再检查一下
fcuandy 2009-04-14
  • 打赏
  • 举报
回复
看下是否有触发器
welru 2009-04-14
  • 打赏
  • 举报
回复
从inputTime和renewtime的信息来看,添加新记录和刷新这条记录相差了三秒,每添加一条新的记录都会这样.
welru 2009-04-14
  • 打赏
  • 举报
回复
我在本地测试没有问题,传上服务器之后就出现了这个问题
ai_li7758521 2009-04-11
  • 打赏
  • 举报
回复
帮顶
fcuandy 2009-04-11
  • 打赏
  • 举报
回复
逻辑上没看出来什么问题,看下是不是你多刷了一次,或者页面处理有问题。

22,210

社区成员

发帖
与我相关
我的任务
社区描述
MS-SQL Server 疑难问题
社区管理员
  • 疑难问题社区
  • 尘觉
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧