淡秋 发表于 2013-5-15 03:49:24

本菜鸟找到一段“统计排名”代码,测试成功,求改进,谢谢

本菜鸟找到一段“统计排名”代码,测试成功,求改进,谢谢
以下为代码,显示2012年期间GroupID=5的用户组发布文章的前10名,

(大小:15.9 K 下载次数:18)

我想改进一点点时间,希望时间范围是本年度(明年的话就自动统计2013年的,不用手动再改时间范围),请问如何修改代码,非常感谢,本人是菜鸟,只有请求各位论坛的兄弟姐妹了^_^

sfs041134 发表于 2013-5-15 04:04:44

Dim Nowyear

Nowyear = year(now())

SqlItem="select Inputer,count(Inputer) as num from PE_Article where (UpdateTime between #"&Nowyear&"-1-01# AND #"&Nowyear&"-12-31#)andInputer in (select UserName from PE_User where GroupID=5) group by Inputer order by count(Inputer) DESC "
页: [1]
查看完整版本: 本菜鸟找到一段“统计排名”代码,测试成功,求改进,谢谢