Foxtable(狐表)用户栏目专家坐堂 → [求助]DateTimePicker不会用啊


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

主题:[求助]DateTimePicker不会用啊

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


加好友 发短信
等级:幼狐 帖子:72 积分:689 威望:0 精华:0 注册:2013/5/10 13:23:00
[求助]DateTimePicker不会用啊  发帖心情 Post By:2014/6/10 10:59:00 [只看该作者]

能不能写一个简单地使用 DateTimePicker 控件做查询的代码啊?
我用sql server数据库
想实现一个简单查询时间段的功能的按钮
Dim Filter As String

Dim dt1 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")
Dim dt2 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker2")

Filter = "Creation_Date >= " & dt1.Value & " And Creation_Date <= " & dt2.Value
DataTables("数据监控").LoadFilter = Filter
DataTables("数据监控").Load()

但是报错,操作数类型冲突: date 与 int 不兼容。
但是DateTimePicker里我已经选的是Date类型的,Creation_Date字段本身就是日期类型的,是不是还需要什么转换?

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/10 11:01:00 [只看该作者]

Dim Filter As String

Dim dt1 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")
Dim dt2 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker2")

Filter = "Creation_Date >= #" & dt1.Value & "# And Creation_Date <= #" & dt2.Value & "#"
DataTables("数据监控").LoadFilter = Filter
DataTables("数据监控").Load()

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


加好友 发短信
等级:幼狐 帖子:72 积分:689 威望:0 精华:0 注册:2013/5/10 13:23:00
  发帖心情 Post By:2014/6/10 11:08:00 [只看该作者]

这样我也试过,会报错'#' 附近有语法错误。 我看说明上写过,只有ACCESS数据库才加#,我是SQL SERVER数据啊,应该就那样写感觉就对的啊。

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


加好友 发短信
等级:贵宾 帖子:35433 积分:178524 威望:0 精华:3 注册:2013/3/30 16:36:00
  发帖心情 Post By:2014/6/10 11:09:00 [只看该作者]

Filter = "Creation_Date >= '" & dt1.Value & "' And Creation_Date <= '" & dt2.Value & "'"

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


加好友 发短信
等级:版主 帖子:85326 积分:427815 威望:0 精华:5 注册:2012/10/18 22:13:00
  发帖心情 Post By:2014/6/10 11:09:00 [只看该作者]

sqlserver,用单引号

 

Dim Filter As String

Dim dt1 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker1")
Dim dt2 As WinForm.DateTimePicker = e.Form.Controls("DateTimePicker2")

Filter = "Creation_Date >= '" & dt1.Value & "' And Creation_Date <= '" & dt2.Value & "'"
DataTables("数据监控").LoadFilter = Filter
DataTables("数据监控").Load()


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


加好友 发短信
等级:幼狐 帖子:72 积分:689 威望:0 精华:0 注册:2013/5/10 13:23:00
  发帖心情 Post By:2014/6/10 11:14:00 [只看该作者]

偶偶!!对就是这个问题,多谢! 原来时间类型要加上’ 到是没注意啊啊

 回到顶部