StrSql = "select 17931client.* from 17931client join 17931order on (17931client.cInstallPhone = 17931order.cInstallPhone) where 17931order.dDatetime >= #" & Trim(Combo2.Text) & "-" & Trim(Combo1.Text) & "-1# And 17931order.dDatetime <= #" & Trim(Combo2.Text) & "-" & Trim(Combo1.Text) & "-31#"其中combo2.text获得年份,combo1.text获得月份,即查询条件为工单表中某年某月的所有客户表中的资料
解决方案 »
- 谁遇见过这种情况
- 求助 vb检测硬件出厂日期
- 如何使自己编写的 ActiveX DLL 文件可以想到用API那样调用?
- 100分求一个完整的拔号程序,先谢谢各位DGDJ
- 哪位大哥能告诉我怎样取得用ADO访问数据库是返回记录集的记录总数啊??急!
- 如何通过ado自动获得*.mdb文件中的表的名称
- 请问在VB中用MSChart控件绘制了一个图表,如何编程处理打印请求把图表打印出来?
- 心情好,放分
- 关于wise installation system9.0的问题。
- command.execute返回的recordset是不是只读的?
- 请问vb连接sql数据库的问题
- 在 windows server 2003 环境下无法使用 msdn 6?如何解决?
StrSql = "select 17931client.* from 17931client join 17931order on (17931client.cInstallPhone = 17931order.cInstallPhone) where 17931order.dDatetime >= " & DateSerial(Trim(Combo2.Text), Trim(Combo1.Text), 1) & "And 17931order.dDatetime <= " & DateSerial(Trim(Combo2.Text), Trim(Combo1.Text), 31)
.*是17931client表的全部字段名
StrSql = "select 17931client.* from 17931client join 17931order on (17931client.cInstallPhone = 17931order.cInstallPhone) where 17931order.dDatetime >= #" & DateSerial(Trim(Combo2.Text), Trim(Combo1.Text), 1) & "# And 17931order.dDatetime <= #" & DateSerial(Trim(Combo2.Text), Trim(Combo1.Text), 31)&"#"