求各位大师看看我这语句哪错了

strSql = "SELECT sum( 借方数量),sum( 借方金额),sum( 贷方数量),sum( 贷方金额) From (select 凭证号,借方数量,借方金额,贷方数量,贷方金额 from [凭证]  where  month(日期)=" & pzQJ & " and (凭证号 between " & xx & " and " & xz & ") and  科目编码 like '" & .Range("b" & i).Value & "%')"
Debug.Print strSql
  rs.Open strSql, cnn, adOpenStatic
   .Range("m" & i).CopyFromRecordset rs

提示数据类型不正确!!!!

month(日期)=" & pzQJ & "
日期不是这样表示的，是用#号。你不妨再试试。