Foxtable(狐表)用户栏目专家坐堂 → 条件


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

主题:条件

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


加好友 发短信
等级:幼狐 帖子:159 积分:1626 威望:0 精华:0 注册:2013/11/15 16:23:00
条件  发帖心情 Post By:2014/4/19 9:10:00 [只看该作者]

Dim Val1,val2,val3,val4,val5 As Integer
    Val1 =DataTables("融资合同备案表").Compute("count(备案编号)", "接收日期 <= #12/31/2013#")
' And "备案单位 = '天津公司' And 借款单位 = '88公司'")
    Output.Show(val1)
为什么加入后边的条件就出错?不加就可以呢?
只用后边的条件也可以? 组合条件就出错

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


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

DataTables("融资合同备案表").Compute("count(备案编号)", "接收日期 <= #12/31/2013# And "备案单位 = '天津公司' And 借款单位 = '88公司'")

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


加好友 发短信
等级:幼狐 帖子:159 积分:1626 威望:0 精华:0 注册:2013/11/15 16:23:00
  发帖心情 Post By:2014/4/19 9:27:00 [只看该作者]

组合条件总是报错


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


加好友 发短信
等级:幼狐 帖子:159 积分:1626 威望:0 精华:0 注册:2013/11/15 16:23:00
  发帖心情 Post By:2014/4/19 9:30:00 [只看该作者]

For Each R1 As Row In Tables("汇总表").Rows
    Dim badw As String = R1("备案单位")
    Dim DW As String = R1("单位")
    Dim Val(5) As  Integer
    Tables("融资合同备案表").Filter = ""
    Dim Val1,val2,val3,val4,val5 As Integer
    Val1 = DataTables("融资合同备案表").Compute("count(备案编号)", "接收日期 <= #" & dt0 & "#" And "备案单位 = '" & BADW & "' And "借款单位 = '" & DW & "'")
    Val2 = DataTables("融资合同备案表").Compute("count(备案编号)", "接收日期 < #" & dt2 & "#")
    Val3 = DataTables("融资合同备案表").Compute("count(备案编号)", "接收日期 >= #" & dt2 & "# And 接收日期 <= #" & dt3 & "#")
    Val4 = DataTables("融资合同备案表").Compute("count(备案编号)", "接收日期 >= #" & dt1 & "# And 接收日期 <= #" & dt3 & "#")
    Val5 = DataTables("融资合同备案表").Compute("count(备案编号)", "接收日期 <= #" & dt3 & "#")
    r1("ncs1") = val1
    r1("qcs1") = val2
    r1("bys1") = val3
    r1("bns1") = val4
    'r1("qms1") = val5
   


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


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

DataTables("融资合同备案表").Compute("count(备案编号)", "接收日期 <= #" & dt0 & "# And 备案单位 = '" & BADW & "' And 借款单位 = '" & DW & "'")

 回到顶部