Foxtable(狐表)用户栏目专家坐堂 → 动态加载 报错问题


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

主题:动态加载 报错问题

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


加好友 发短信
等级:幼狐 帖子:115 积分:1014 威望:0 精华:0 注册:2014/11/3 20:24:00
动态加载 报错问题  发帖心情 Post By:2016/11/29 16:45:00 [只看该作者]

If e.Table.Current IsNot Nothing Then
   
DataTables("订单明细").LoadFilter = "订单编号 = " & e.Table.Current("订单编号")
Else

    DataTables("订单明细").LoadFilter =
"[_Identify] is null"

End
If
DataTables
("订单明细").Load()

这样我们选择某行订单,就会自动加载对应的订单明细。

上面的代码也有不足,例如处理A订单的时候,会自动加载A订单的明细,当处理完B订单后再回到A订单,又得重新加载一次A订单的订单明细,显然这种重复加载是一种"浪费"。

我们可以再完善一下代码,避免数据重复加载:

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

End
If



这个是 帮助文件的实例  运用后 两个实例代码均报错..

.NET Framework 版本:2.0.50727.5485

Foxtable 版本:2016.7.29.1

错误所在事件:加载[top_order]失败!

详细错误信息:

将 varchar 转换为数据类型 numeric 时出现算术溢出错误。


图片点击可在新窗口打开查看此主题相关图片如下:err.jpg
图片点击可在新窗口打开查看


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


加好友 发短信
等级:幼狐 帖子:115 积分:1014 威望:0 精华:0 注册:2014/11/3 20:24:00
  发帖心情 Post By:2016/11/29 16:45:00 [只看该作者]

老师帮看看


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


加好友 发短信
等级:幼狐 帖子:115 积分:1014 威望:0 精华:0 注册:2014/11/3 20:24:00
  发帖心情 Post By:2016/11/29 16:48:00 [只看该作者]

数据类型是没有问题的

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


加好友 发短信
等级:超级版主 帖子:107861 积分:548662 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/11/29 17:04:00 [只看该作者]

贴出你自己有问题的代码,贴出帮助的代码没有任何意义。

如果订单编号是字符列,这样

DataTables("订单明细").LoadFilter = "订单编号 = '" & e.Table.Current("订单编号") & "'"

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


加好友 发短信
等级:幼狐 帖子:115 积分:1014 威望:0 精华:0 注册:2014/11/3 20:24:00
  发帖心情 Post By:2016/11/29 17:13:00 [只看该作者]

我自己的代码 就是套用帮助文件的
If e.Table.Current IsNot Nothing Then
 DataTables("top_order").LoadFilter = "top_tid = '" & e.Table.Current("top_tid") & "'"
Else
  DataTables("top_order").LoadFilter = "[top_order_id] Is Null"
End If
DataTables("top_order").Load()


数据类型

图片点击可在新窗口打开查看此主题相关图片如下:er.jpg
图片点击可在新窗口打开查看


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


加好友 发短信
等级:超级版主 帖子:107861 积分:548662 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2016/11/29 17:38:00 [只看该作者]

加载代码没有问题。应该是表事件或者表达式出错。



 回到顶部