Foxtable(狐表)用户栏目专家坐堂 → [求助]时间表达式有问题


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

主题:[求助]时间表达式有问题

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


加好友 发短信
等级:婴狐 帖子:88 积分:844 威望:0 精华:0 注册:2013/10/15 15:04:00
[求助]时间表达式有问题  发帖心情 Post By:2013/11/25 9:57:00 [显示全部帖子]

If e.Node.Text = "当天"
            Tables("tb_product").Filter = "[fx_orderdate] = #date.today# "

 

.NET Framework 版本:2.0.50727.42
Foxtable 版本:2013.6.28.1
错误所在事件:
详细错误信息:
The string was not recognized as a valid DateTime. There is a unknown word starting at index 0.

 

原完整代码:

 

Dim Value() As String
Value = e.Node.FullPath.Split("\")
Select Case e.Node.Level
    Case 0
        If e.Node.Text = "显示所有行" Then
            Tables("tb_product").Filter = "[hasCancel]=false"
        ElseIf e.Node.Text = "当天"
            Tables("tb_product").Filter = "[fx_orderdate] = #date.today# "
        ElseIf e.Node.Text = "五日内"
            Tables("tb_product").Filter = "[fx_orderdate] >=#(date.todaya-5)# "
        ElseIf e.Node.Text = "十五日内"
           Tables("tb_product").Filter = "[fx_orderdate] >=#(date.todaya-15)# "
        End If
    Case 1
        Tables("tb_product").Filter = "[fx_orderdate] = '" & Value(0) & "' And [productname] = '" & Value(1) & "'"
End Select

 


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


加好友 发短信
等级:婴狐 帖子:88 积分:844 威望:0 精华:0 注册:2013/10/15 15:04:00
  发帖心情 Post By:2013/11/25 14:20:00 [显示全部帖子]

谢谢指点。


 回到顶部