asp使用access，count的使用。该怎么处理

asp使用access，count的使用。

VBScript code

  <%dim rsdim sqlstrset rs=server.CreateObject("adodb.recordset")sqlstr="select count(*) as mnum from MessageTable where RecieveMan='admin'and MessageFlag=0"rs.open sqlstr,conn,1,3 mnum=rs("mnum")rs.closeset rs=nothingcall closeconn() response.write mnum%>

这样为什么没有值呢？原来使用sql数据库。想改为access，结果发现还真不容易。

[解决办法]
dim rs
dim sqlstr
set rs=server.CreateObject("adodb.recordset")
sqlstr="select count(*) as mnum from MessageTable where RecieveMan='admin'and MessageFlag=0"
rs.open sqlstr,conn,1,1 
mnum=rs("mnum")
rs.close
set rs=nothing
call closeconn() 
response.write mnum
[解决办法]
sqlstr="select RecieveMan,MessageFlag, count(*) as mnum from MessageTable where RecieveMan='admin'and MessageFlag=0 group by RecieveMan,MessageFlag"