为什么我执行如下语句时,提示:“多步OLE DB操作错误…………,工作未完成!”的提示?
ObjRs.Open "Select A.XM as 开单医生,B.XMMC As 费用项目,Sum(B.SL) As 项目数量,Sum(B.JE) As 费用合计 From WH_RYB A,ZY_YZZXB B Where A.CZYID=B.KDYS And B.SL<>0 and '" & Format(DTPicker1.Value, "YYYY-MM-DD HH:MM:SS") & "'<=convert(datetime,B.ZXSJ)" & " And '" & Format(DTPicker2.Value, "YYYY-MM-DD HH:MM:SS") & "'>=convert(datetime,B.ZXSJ) Group By B.KDYS,B.XMMC,A.XM Order By A.XM", ObjConn, 1, 1其中:WH_RYB表是存储医生资料的表。ZY_YZZXB表存储的是医生开单记录。
各字段说明如下:
A.XM:医生姓名
A.CZYID:医生ID
B.KDYS:开单医生ID
B.XMMC:开单项目
B.SL:开据项目的数量
B.JE:开据金额急等解决?
ObjRs.Open "Select A.XM as 开单医生,B.XMMC As 费用项目,Sum(B.SL) As 项目数量,Sum(B.JE) As 费用合计 From WH_RYB A,ZY_YZZXB B Where A.CZYID=B.KDYS And B.SL<>0 and '" & Format(DTPicker1.Value, "YYYY-MM-DD HH:MM:SS") & "'<=convert(datetime,B.ZXSJ)" & " And '" & Format(DTPicker2.Value, "YYYY-MM-DD HH:MM:SS") & "'>=convert(datetime,B.ZXSJ) Group By B.KDYS,B.XMMC,A.XM Order By A.XM", ObjConn, 1, 1其中:WH_RYB表是存储医生资料的表。ZY_YZZXB表存储的是医生开单记录。
各字段说明如下:
A.XM:医生姓名
A.CZYID:医生ID
B.KDYS:开单医生ID
B.XMMC:开单项目
B.SL:开据项目的数量
B.JE:开据金额急等解决?
最好是用datediff