Dim dBeginDate, dEndDate As String
dim strSQL as string
dBeginDate = Format(CDate(ComboYear(0) & "-" & ComboMonth(0) & "-1"), "yyyy-mm-dd")
dEndDate = Format(CDate(ComboYear(1) & "-" & ComboMonth(1) & "-1"), "yyyy-mm-dd")
strSQL="select * from table1 where dDate between #'"&dBeginDate&"'# and #'"&dEndDate&"'#"
rs.open strSQL,cn
___________________________________________
请问上面的格式对吗,应该怎么写?谢谢!
dim strSQL as string
dBeginDate = Format(CDate(ComboYear(0) & "-" & ComboMonth(0) & "-1"), "yyyy-mm-dd")
dEndDate = Format(CDate(ComboYear(1) & "-" & ComboMonth(1) & "-1"), "yyyy-mm-dd")
strSQL="select * from table1 where dDate between #'"&dBeginDate&"'# and #'"&dEndDate&"'#"
rs.open strSQL,cn
___________________________________________
请问上面的格式对吗,应该怎么写?谢谢!
解决方案 »
- 在已设定mshflexgrid的各个列的宽度后,如何设定表格的宽度能正好放下这些列呢?
- 如何读取某WORD文档内所有内容(不含图片)?
- 关于ADO控件的版本问题
- 请问谁有检测Win2000 sever下CPU占用率的VB代码
- 关于控件的ToolTipText
- 结构体写入文件和读出的时候不一致,什么原因
- 我的管理学难题,谁能帮我 谢谢了!
- ocx一位
- 有关在textbox中使用方向键的问题?
- 各位大虾,vb中是否有定义矩阵的控件?还要实现矩阵的到置,矩阵相乘,把矩阵中单个元素赋予变量,谢谢*999次
- 请高手指教关于在多窗体中数据查询
- tb.AddNew执行时为何提示“对象或者提供者不能执行所需的操作”??(代码在里面)
select * from 视图 where product_id=select product_id from product where product_name='"&trim(name.text)&"' and date = #yy-mm-dd#这样有问题,它会把and date=...当成子查询的条件,那又如何去实现呢?