想查出同名次数2次及以上的数据，总报“错误 '80020009' ”

[germ007]

想查出同名次数2次及以上的数据，总报“错误 '80020009' ”


table1
id name time
1 tom 2011
2 john 2009
3 tom 2012
4 joly 2013
5 john 2013
想查出同名次数2及以上的数据

<%

	  set rs=server.CreateObject("adodb.recordset")
  rs.open "select Name,count(id) as tota1 from table1  group by Name order by tota1  desc",conn,1,1
  do while not rs("total")<2
    response.Write(rs("name")&rs("tota1")&"<br>")
	 rs.movenext
	 loop
	 rs.close
	 set rs=nothing

	
   %> 

结果显示

tom2
john2

错误 '80020009'

[zhanghongwen]

set rs=server.CreateObject("adodb.recordset") rs.open "select * from (select Name,count(id) as tota1 from table1 group by Name)T where tota1<2 order by tota1 desc",conn,1,1 do while not rs.Eof response.Write(rs("name")&rs("tota1")&"<br>") rs.movenext loop rs.close set rs=nothing 试一下这样

[街头小贩]

好好看看的SQL语句

rs.open "select Name,count(id) as tota1 from table1  group by Name order by tota1  desc",conn,1,1

是tota1不是total,最后一个字符你在SQL中是1

[fzfei2]

do while not rs.eof and   rs("total")>=2

[germ007]

谢谢，试过了，还是显示“错误 '80020009' ”