audition怎么破解:ASP 分类求和

表Product有如下字段,从外部输入一个月份(如:2006-7),我要实现2006年7月份按员工分类求scnum,zhk,sccb,scml字段值的总和，并将求得的值赋给变量scnum,zhk,sccb,scml(说明:name字段,是不固定的,可能有更多）

name scnum zhk sccb scml date
A 50 500 200 300 2006-7-1
b 20 200 80 120 2006-7-1
C 30 300 120 180 2006-7-1
A 50 500 200 300 2006-7-20
A 50 500 200 300 2006-6-10
A 50 500 200 300 2006-5-2

我要实现的统计工作就是月结转(如输入2006-7)，得到：
员工A 2006-7月份的scnum总和为100并赋值给变量scnum，zhk总和为1000并赋值给zhk ……
员工B ……

本人真诚希望得到各位大侠的指点，欢迎与我联系！
QQ：34407255
<% dim ……
Action=trim(Request("Action"))
yearmonth=trim(request("yearmonth"))
if Action="Add" then
Set rs=Server.CreateObject("Adodb.RecordSet")
rs.open "Select * From sumname Where yearmonth='" & yearmonth & "'",conn,1,3
if not (rs.bof and rs.EOF) then
dim rst,i
set rst=Server.CreateObject("Adodb.RecordSet")
rst.open"select Name,sum(scml) as sumscml,sum(sccb) as sumsccb,sum(zhk) as sumzhk,sum(scnum) as sumscnum from Product group by Name",conn,1,1
for i=0 to rst.recordcount
if rst.eof then exit for
rs.addnew
rs("Name")=Name
rs("sumscml")=sumscml
rs("sumsccb")=sumsccb
rs("sumzhk")=sumzhk
……
rs.update
rs.Close
set rs=Nothing
rst.movenext
next
end if
call CloseConn()
end if
%>将表Product中字段求和后赋值给sumscnum sumzhk sumsccb sumscml,并在表sumname中增加各员工的月统计新记录,可是没用,怎样把月份为yearmonth的统计条件加进去,表Product中的DATE字段的格式(2006-7-1),yearmonth是年月的表达式(2006-7)