Dim sql As String = "Select a.姓名 as 置业顾问, b.佣金, b.结佣日, b.类型, b.套数, a.门店, a.上岗日期, a.离职日期 from {员工管理} a left join {佣金明细} b on (a.姓名 = b.置业顾问) where 上岗日期 <= #" & d2 & "# and (离职日期 <= #" & d2 & "# and 离职日期 >= #" & d1 & "#
or 离职日期 is null) and (结佣日 >= #" & d1 & "# and 结佣日 <= #" & d2 & "# or 结佣日 is null)"
加好友 
发短信
Post By：2014/6/18 22:40:00 [只看该作者]
