in的动态合成表达式总提示出错 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

Foxtable(狐表) → 用户栏目 → 专家坐堂 → in的动态合成表达式总提示出错

共有3481人关注过本帖树形打印复制链接主题：in的动态合成表达式总提示出错

scott518

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：292 积分：2488 威望：0 精华：0 注册：2011/11/4 17:32:00

in的动态合成表达式总提示出错 发帖心情

Post By：2014/6/16 18:29:00 [只看该作者]

如下代码：

'集合选择的单据编号加载数据
    Dim ids As String
    For Each r As Row In tbl.Rows
        If r("选择") = True Then
            ids = ids & ",'" & r(Vars("Idc")) & "'"
        End If
    Next
    ids= ids.Trim(",")
    msgbox(Vars("Idc") & " In (" & ids & ")")
    DataTables(Mtb & "_主表").LoadFilter = Vars("Idc") & " In (" & ids & ")"
    DataTables(Mtb & "_主表").Load()

msgbox显示出来是：

订单编号 In ('D1404-027','D1404-028','D1404-029')

请教是哪里错了，为何总提示 ')' 附近有语法错误。

谢谢！

有点甜

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/6/16 19:07:00 [只看该作者]

代码没有错。这个表是窗口表？是查询表？

具体问题，请上传例子

scott518

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：292 积分：2488 威望：0 精华：0 注册：2011/11/4 17:32:00

Post By：2014/6/16 19:24:00 [只看该作者]

因关联到的表太多都是动态加载的表，所以一时半会做不出例子来。

[此贴子已经被作者于2014-6-16 21:40:53编辑过]

有点甜

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：版主帖子：85326 积分：427815 威望：0 精华：5 注册：2012/10/18 22:13:00

Post By：2014/6/16 19:27:00 [只看该作者]

做个例子发上来，代码看着没有错。

scott518

小大 5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：童狐帖子：292 积分：2488 威望：0 精华：0 注册：2011/11/4 17:32:00

Post By：2014/6/16 21:26:00 [只看该作者]

做了一个晚上，还是没办法让问题重现，后来将语句改为

    Dim ids As String
    For Each r As Row In tbl.Rows
        If r("选择") = True Then
            ids = ids & ",'" & r(Vars("Idc")) & "'"
        End If
    Next
    ids= ids.Trim(",")
    Dim sql As String = "Select * from " Mtb " & where " & Vars("Idc") & " In (" & ids & ")"
    DataTables(Mtb & "_主表").SQLLoad(sql)

后面两名改为sqlload的形式就可以了，因为原来的主表也是用sqlLoad加载的，

就此想请问一下，是不是原来是用SQLLoad加载的表，后续重新加载时也必须用SQLLoad加载？

谢谢！