一个sql语句不会写，关于业务量信息登记的

[jiangjinsong]

<%
dim conn,sql,rs
set conn=Server.CreateObject("adodb.Connection")
conn.provider="microsoft.jet.oledb.4.0"
conn.open Server.MapPath("/porder/porder.mdb")
sql="select 服务日期,业务员,count(公司名称) as 业务量 from  业务信息登记 group by 服务日期"
set rs=conn.Execute(sql)
if Err.number>0 then
Response.Write(Err.Description)
end if
if rs.bof  then
Response.Write "现在还有没有数据"
else
do while  not rs.eof
Response.Write rs("服务日期")&"    "&rs("业务员")&"    "&rs("业务量")&"<br>"
rs.movenext
loop
end  if
set rs=nothing
set conn=nothing

%>

希望有这样的效果
服务时间 业务员 业务量
2008-9-10 业务员A 10条
2008-9-10 业务员b 10条
2008-9-10 业务员c 88条
2008-9-10 业务员d 190条
2008-9-10 业务员e 12条
...................
2008-9-1 业务员b 10条
2008-9-1 业务员c 88条
2008-9-1 业务员d 190条

[jiangjinsong]

sql="select 服务日期,业务员,count(公司名称) as 业务量 from 业务信息登记 group by 服务日期,业务员"

[jiangjinsong]

sql="select 服务日期,业务员,count(公司名称) as 业务量 from 业务信息登记 where 服务日期=#"&sqldate&"# group by 服务日期,业务员 ORDER BY 服务日期 DESC"

[jiangjinsong]

下面的sql语句有没有什么问题啊？
sqldate3=y&"-"&Cint(m)-1&"-"&"1"
sqldate4=y&"-"&Cint(m)-1&"-"&"31"
sql5="select count(公司名称) as 业务量 from 业务信息登记 where 服务日期 between #"&sqldate3&"# and #"&sqldate4"#"
求上个月的记录的记录总数

[jiangjinsong]

sql5="select count(公司名称) as 业务量 from 业务信息登记 where 服务日期 between #"&sqldate3&"# and #"&sqldate4&"#" 靠，原来少了一个&

[gingerkang]

m=1的时候-1就是0了，算不算问题?

[jiangjinsong]

把分给你 交个朋友