有人帮我吗 - ASP - 新微赢技术网

⿴°愛丶°牠

电梯直达

1^#

发表于 2010-1-7 03:59:47 | 只看该作者回帖奖励

|倒序浏览 |阅读模式

<% add=request("my") sql="update soft set hit=hit+1 where add="&add conn.execute(sql) set rs=server.CreateObject("adodb.recordset") sql="select * from soft where add="&add rs.open sql,conn,3,2 if 　　　　　　　　　　　　　　　　　'rs("tday"),rs("wday"),rs("mday")为日周月的点击数，　　　　　　　　　　　　　　　　'rs("ttime"),rs("wtime"),rs("mtime") 为日周月的时间数 rs("ttime")=day(now()) then rs("tday")=rs("tday")+1 '日点击数自加1 rs("wday")=rs("wday")+1 '周点击数自加1 rs("mday")=rs("mday")+1 '月点击数自加1 rs.update elseif rs("wtime")=weekday(now()) rs("mday")=rs("mday")+1 '周点击数加1 rs("wday")=rs("wday")+1 '月点击数加1 rs("tday")=0 '如果不是今天就让昨天的点击数为０ rs("ttime")=day(now()) '让日期为今天的日期 rs.update elseif rs("mtime")=month(now())　　 rs("mday")=rs("mday")+1　　　 '月点击数加１ rs("wday")=0 '如果不是本周就让上周点击为０ rs("wtime")=weekday(now())　　　'让周为这周的时间 rs.update else rs("mday")=0 '如果不是本月就让本月点击为０ rs("mtime")=month(now())　　　　 rs.update end if
response.Redirect (rs("get")&"\"&rs("address")) rs.close set rs=nothing conn.close set conn=nothing %> 小弟想要得到日周月的点击数，但是一直实现不了，请各位高手帮帮忙．

收藏0

使用道具举报

为爱种菜！

2^#

发表于 2010-1-7 03:59:50 | 只看该作者

各位老大,来帮我看一下.

回复支持反对

使用道具举报

导演

3^#

发表于 2010-1-7 03:59:53 | 只看该作者

我上次给你的代码可以做到今日点击，昨日点击，本月点击，上月点击，
但是周操作，我感觉比较麻烦，
周操作我没有做过，不过有个思路，
比如说从周一到周日　算一周（符全我们的传统）
你可以先判断今天是不是周一，如果不是则让本周的点击加1
如果上则把本周的存放到上周，然后再把本周置0
这是一思路，一会回家我做做测试，如果可以，明天我把代码给你发一下，
如果失败，等老大来了，请教他吧，

回复支持反对

使用道具举报

liu

4^#

发表于 2010-1-7 03:59:55 | 只看该作者

一加红色的就会出现错误

回复支持反对

使用道具举报

下眩月

5^#

发表于 2010-3-7 09:05:06 | 只看该作者

经过你的指点我还是没找到在哪 ~~~

回复支持反对

使用道具举报

		自动登录	找回密码
密码			注册