Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]语法错误


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

主题：[求助]语法错误
帅哥哟，离线，有人找我吗？
188802386
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：629 积分：4927 威望：0 精华：0 注册：2014/2/25 15:50:00 		[求助]语法错误  发帖心情 Post By：2017/12/25 14:43:00 [只看该作者]

If e.Table.Current IsNot Nothing Then
    Dim Filter As String = "成交编号 = '" & e.Table.Current("编号") & "'"
    If  DataTables("commission").Find(Filter) Is Nothing Then '如果对应的订单明细没有加载过
        DataTables("commission").AppendLoad(Filter) '则追载此订单的订单明细
    End If
End If

提示语法错误
.NET Framework 版本：2.0.50727.8669
Foxtable 版本：2017.12.18.1
错误所在事件：
详细错误信息：
'commission] Where 成交编号 = 'cj-201712-0008'' 附近有语法错误。
字符串 'commission] Where 成交编号 = 'cj-201712-0008'' 后的引号不完整。

请问该如何写语法，为什么之前的系统都能运行呢
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

关闭项目重新打开，加入msgbox看弹出什么

 

If e.Table.Current IsNot Nothing Then
    Dim Filter As String = "成交编号 = '" & e.Table.Current("编号") & "'"
    If  DataTables("commission").Find(Filter) Is Nothing Then '如果对应的订单明细没有加载过
        msgbox(DataTables("commission").LoadFilter)
        DataTables("commission").AppendLoad(Filter) '则追载此订单的订单明细
        msgbox(DataTables("commission").LoadFilter)
    End If
End If
 回到顶部
帅哥哟，离线，有人找我吗？
188802386
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：629 积分：4927 威望：0 精华：0 注册：2014/2/25 15:50:00 		  发帖心情 Post By：2017/12/25 14:59:00 [只看该作者]

设置了外部数据  过滤条件 [_Identify] is null   然后通过上面的代码后 就弹出了    [_Identify] is null 

 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

以下是引用188802386在2017/12/25 14:59:00的发言：
设置了外部数据  过滤条件 [_Identify] is null   然后通过上面的代码后 就弹出了    [_Identify] is null 

 

第二次执行的时候（报错之后），弹出什么？
 回到顶部
帅哥哟，离线，有人找我吗？
188802386
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：629 积分：4927 威望：0 精华：0 注册：2014/2/25 15:50:00 		  发帖心情 Post By：2017/12/25 15:25:00 [只看该作者]

第一次和第二次弹出的内容是一样的，如果取消过滤条件 弹出框的内容为空
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

以下是引用188802386在2017/12/25 15:25:00的发言：
第一次和第二次弹出的内容是一样的，如果取消过滤条件 弹出框的内容为空

 

弹出msgbox(filter)看看，那不可能有问题。实例发上来测试。
 回到顶部
帅哥哟，离线，有人找我吗？
188802386
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：629 积分：4927 威望：0 精华：0 注册：2014/2/25 15:50:00 		  发帖心情 Post By：2017/12/25 15:53:00 [只看该作者]

就是一个订单表和一个明细表，默认明细表为空   但点击订单表某一行后能实现从后台加载该订单表的明细，请问有没其他办法呢 用的是sql数据库
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

执行这个代码不可能报错 DataTables("commission").AppendLoad(Filter) '则追载此订单的订单明细

 

请确认是哪句代码报错造成的，实例发上来测试。
 回到顶部
帅哥哟，离线，有人找我吗？
188802386
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：三尾狐 帖子：629 积分：4927 威望：0 精华：0 注册：2014/2/25 15:50:00 		  发帖心情 Post By：2017/12/26 17:56:00 [只看该作者]

If e.Table.Current IsNot Nothing Then
msgbox("1")
    Dim Filter As String = "成交编号 = '" & e.Table.Current("编号") & "'"
msgbox("2")
    If  DataTables("commission").Find(Filter) Is Nothing Then '如果对应的订单明细没有加载过
msgbox("3")
        DataTables("commission").AppendLoad(Filter) '则追载此订单的订单明细
msgbox("4")
    End If
End If

这段出错
图片点击可在新窗口打开查看此主题相关图片如下：企业微信截图_20171226175426.png
图片点击可在新窗口打开查看
 回到顶部
帅哥哟，离线，有人找我吗？
有点甜
 小大  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


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

msgbox(filter)弹出什么？

 回到顶部
总数 21 1 2 3 下一页
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.07422 秒, 4 次数据查询