以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  日期月份问题  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=116026)

--  作者:实话实说
--  发布时间:2018/3/19 8:17:00
--  日期月份问题
以下代码的第三行加载的日期范围的数据,即当前日期到之前6个月的日期。
Dim cmb As New SQLCommand
cmb.C
cmb.CommandText = "Select * Fro m {材料明细} Where 日期 >= \'" & Date.Today.AddMonths(- 6) & "\' And 日期  <= \'" & Date.Today.AddMonths(0) & "\'"

我现在想加载的是201709月到201803月的数据,类似于
cmb.CommandText = "Select * Fro m {材料明细} Where 月份 >= \'" & Date.Today.AddMonths(- 6) & "\' And 月份  <= \'" & Date.Today.AddMonths(0) & "\'"
月份字段为字符型,201709表示2017年9月,上述代码如何变通?



--  作者:y2287958
--  发布时间:2018/3/19 8:26:00
--  
条件分两段:2017年9-12月,2018年1-3月
--  作者:有点甜
--  发布时间:2018/3/19 8:27:00
--  
cmb.CommandText = "Select * Fro m {材料明细} Where 月份 >= \'" & format(Date.Today.AddMonths(-6), "yyyyMM") & "\' And 月份  <= \'" & Format(Date.Today, "yyyyMM") & "\'"
--  作者:实话实说
--  发布时间:2018/3/19 8:52:00
--  
谢了