老师,我参照改了一下,还是有问题,代为修改一下。
cmd.CommandText = "se lect 上报日期,year(上报日期) as 年,month(上报日期) as 月,day(上报日期) as 日,"
cmd.CommandText = cmd.CommandText & " RTRIM(Case WHEN DATEPART(dw,DATEADD(dd,-DAY(上报日期),上报日期))>=5 Then 0 Else 1 End + Case WHEN DATEPART(dw,DATEADD(dd,-1,上报日期)) >= 5 Then CEILING(DAY(DATEADD(dd,-7,上报日期))/7.0) Else CEILING(DAY(上报日期)/7.0) End) as 周"
cmd.CommandText = cmd.CommandText & " ,负责人,数量,完成,计划日期,回复逾期,逾期,首复逾期,终复逾期 fro m {生产车间欠料表} where 上报日期 between '" & dt1.Value & "' And '" & dt2.Value & "'"