Foxtable(狐表)用户栏目专家坐堂 → 求教动态加载行


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

主题:求教动态加载行

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
求教动态加载行  发帖心情 Post By:2018/1/9 7:59:00 [显示全部帖子]

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


如果订单编号是字符型,怎么修改


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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/1/9 8:07:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180109080628.png
图片点击可在新窗口打开查看
出现这个错误,什么原因

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/1/9 9:00:00 [显示全部帖子]

If e.Table.Current IsNot Nothing Then
    Dim Filter As String = "项目编号 = '" & e.Table.Current("项目编号") & "'"
 '   MessageBox.Show(filter)
    If  DataTables("器材明细表").Find(Filter) Is Nothing Then '如果对应的订单明细没有加载过
        DataTables("器材明细表").AppendLoad(Filter) '则追载此订单的订单明细
    End If
End If
    
If e.Table.Current IsNot Nothing Then
    Dim Filter As String = "项目编号 = '" & e.Table.Current("项目编号") & "'"
 '   MessageBox.Show(filter)
    If  DataTables("实际工程量").Find(Filter) Is Nothing Then '如果对应的订单明细没有加载过
        DataTables("实际工程量").AppendLoad(Filter) '则追载此订单的订单明细
    End If
End If
    

加载多条怎么弄呢

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/1/9 11:57:00 [显示全部帖子]

还是不会写呀


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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/1/9 12:00:00 [显示全部帖子]

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

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/1/9 12:46:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:qq截图20180109124526.png
图片点击可在新窗口打开查看
有错误提示

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/1/9 16:30:00 [显示全部帖子]

 beforeLoad 事件、afterLoad 事件  都是空的

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/1/9 19:35:00 [显示全部帖子]

上传附件不知道传到了吗? 这是放百度云盘的文件 https://pan.baidu.com/s/1jJqf2Ay
[此贴子已经被作者于2018/1/9 19:40:18编辑过]

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/1/10 17:46:00 [显示全部帖子]

888888

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


加好友 发短信
等级:幼狐 帖子:164 积分:2002 威望:0 精华:0 注册:2008/9/7 0:06:00
  发帖心情 Post By:2018/1/10 23:04:00 [显示全部帖子]

谢谢问题解决了,是这个原因

 回到顶部
总数 11 1 2 下一页