Foxtable(狐表)用户栏目专家坐堂 → [求助]SQLGetComboListString提取时间集合到ComboBox


  共有3824人关注过本帖树形打印复制链接

主题:[求助]SQLGetComboListString提取时间集合到ComboBox

帅哥哟,离线,有人找我吗?
huaziqiao1976
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:137 积分:1175 威望:0 精华:0 注册:2020/9/28 9:41:00
[求助]SQLGetComboListString提取时间集合到ComboBox  发帖心情 Post By:2023/9/22 10:08:00 [只看该作者]

所属期起  所属期止 两列都是日期类型,提取出来的日期都带有00:00:00,所以用了left截取,
Dim rq1 As WinForm.ComboBox = e.Form.Controls("ComboBox3")
rq1.ComboList = DataTables("查询统计表").SQLGetComboListString("left(所属期起,10)","单位 = '" & dw & "'and 征收项目 = '" & xm & "'")

下面的集合就无效了,rq1应该怎么事进去

Dim rq2 As WinForm.ComboBox = e.Form.Controls("ComboBox4")
rq2.ComboList = DataTables("查询统计表").SQLGetComboListString("left(所属期止,10)","单位 = '" & dw & "'and 征收项目 = '" & xm & "' and 所属期起 = '" & format(rq1,"yyyy-MM-dd" &""& "HH:mm:ss")  & "'")    
但是用find 又能查询到
Dim dr As DataRow
dr = DataTables("查询统计表").Find("单位 = '" & dw & "' and 征收项目 = '" & xm & "' and 所属期起 = '" & rq1 & "'")
e.Form.Controls("ComboBox4").Value = dr("所属期止")
[此贴子已经被作者于2023/9/22 10:10:53编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110494 积分:562348 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/9/22 10:31:00 [只看该作者]

rq2.ComboList = DataTables("查询统计表").SQLGetComboListString("left(所属期止,10)","单位 = '" & dw & "'and 征收项目 = '" & xm & "' and 所属期起 = '" & rq1  & "'")    

 回到顶部
帅哥哟,离线,有人找我吗?
huaziqiao1976
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:137 积分:1175 威望:0 精华:0 注册:2020/9/28 9:41:00
  发帖心情 Post By:2023/9/22 11:34:00 [只看该作者]

还是无效,方案2窗口
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:统计.foxdb


[此贴子已经被作者于2023/9/22 11:39:37编辑过]

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:110494 积分:562348 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2023/9/22 11:55:00 [只看该作者]

内部表和access,日期值改为使用#

rq2.ComboList = DataTables("查询统计表").SQLGetComboListString("left(所属期止,10)","单位 = '" & dw & "' and 征收项目 = '" & xm & "' and 所属期起 = #" & rq1 & "#")   

 回到顶部