Foxtable(狐表)用户栏目专家坐堂 → 三个表间取值的问题


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

主题:三个表间取值的问题

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


加好友 发短信
等级:一尾狐 帖子:430 积分:4655 威望:0 精华:0 注册:2015/3/21 14:25:00
三个表间取值的问题  发帖心情 Post By:2019/1/26 21:25:00 [显示全部帖子]

说明:调度总表增加一行后自动生成了调度时间和调度单号,车号及车属性信息是通过选择进行添加。调度信息明细是通过信息总表的“选定”逻辑列来复制部分列内容
问题:调度时细表在复制信息总表行的同时怎么样可以自行将调度总表中的调度时间、调度单号、车号、司机、车属性等信息一并复制到新增行里
请指教
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table


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


加好友 发短信
等级:一尾狐 帖子:430 积分:4655 威望:0 精华:0 注册:2015/3/21 14:25:00
  发帖心情 Post By:2019/1/27 20:30:00 [显示全部帖子]

调度窗口中“添加运单”,选定运单增加行的同时,能把调度信息总表相应对应的调度单号及调度时间一并复制到调度信息明细表中的相应列中

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


加好友 发短信
等级:一尾狐 帖子:430 积分:4655 威望:0 精华:0 注册:2015/3/21 14:25:00
  发帖心情 Post By:2019/1/28 8:41:00 [显示全部帖子]

谢甜版
我晚上试一下

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


加好友 发短信
等级:一尾狐 帖子:430 积分:4655 威望:0 精华:0 注册:2015/3/21 14:25:00
  发帖心情 Post By:2019/1/29 13:28:00 [显示全部帖子]

解决了
还有一个问题:如果将原来通过逻辑列“选定”复制到调度信息明细表的行删除,则信息总表中对应行的逻辑列都变为FALSE。怎么实现
麻烦了

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


加好友 发短信
等级:一尾狐 帖子:430 积分:4655 威望:0 精华:0 注册:2015/3/21 14:25:00
  发帖心情 Post By:2019/1/29 17:09:00 [显示全部帖子]

我可能没说明白。是删除调度信息明细表中的行后,信息总表相对应的“选定”逻辑行变为FALSE

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


加好友 发短信
等级:一尾狐 帖子:430 积分:4655 威望:0 精华:0 注册:2015/3/21 14:25:00
  发帖心情 Post By:2019/1/29 19:43:00 [显示全部帖子]


图片点击可在新窗口打开查看此主题相关图片如下:9fj%`trt$5dcahah637cc`e.png
图片点击可在新窗口打开查看

[此贴子已经被作者于2019/1/29 19:52:01编辑过]

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


加好友 发短信
等级:一尾狐 帖子:430 积分:4655 威望:0 精华:0 注册:2015/3/21 14:25:00
  发帖心情 Post By:2019/1/31 21:08:00 [显示全部帖子]

谢两位老师

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


加好友 发短信
等级:一尾狐 帖子:430 积分:4655 威望:0 精华:0 注册:2015/3/21 14:25:00
  发帖心情 Post By:2019/4/29 20:52:00 [显示全部帖子]

又有一个问题:在调度窗口中“添加运单”,打开运单表点“选定”打勾后,再取消打上的勾,会提示以下错误:

 

.NET Framework 版本:2.0.50727.9035
Foxtable 版本:2018.10.9.1
错误所在事件:表,信息总表,DataColChanged
详细错误信息:
调用的目标发生了异常。
不能在 OnRowDeleting 事件内部调用 Delete。引发异常以取消此删除。


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


加好友 发短信
等级:一尾狐 帖子:430 积分:4655 威望:0 精华:0 注册:2015/3/21 14:25:00
  发帖心情 Post By:2019/4/29 20:55:00 [显示全部帖子]

信息总表DATACOLCHANGED事件的代码如下:

If e.DataCol.Name = "选定" AndAlso e.DataRow("选定") = True Then
    Dim nma() As String = {"办事处","运输车辆性质","交车单位名称","配板清单号","运输单号","任务单号","VIN码","上游客户","品牌","商品车","数量","出发地","到达地","运输动态","里程","计划下达时间","计划交车时间","下游终点省份","下游实际运输动态","ID"} 'A表数据来源列
    Dim nmb() As String = {"办事处","运输车辆性质","交车单位名称","配板清单号","运输单号","任务单号","VIN码","上游客户","品牌","商品车","运输台数","出发地","到达地","运输动态","里程","计划下达时间","计划交车时间","下游终点省份","下游实际运输动态","ID"} 'B表数据接收列
    Dim dr As DataRow = DataTables("调度信息明细表").AddNew
    For i As Integer = 0 To nma.Length - 1
        dr(nmb(i)) = e.DataRow(nma(i))
    Next
    dr("调度单号") = Tables("调度信息总表").current("调度单号")
    dr("调度时间") = Tables("调度信息总表").current("调度时间")
End If
If Tables("调度信息明细表").Current IsNot Nothing Then
    If e.DataCol.Name = "选定" AndAlso e.DataRow("选定") = False Then
        Tables("调度信息明细表").Current.Delete()
    End If
End If


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


加好友 发短信
等级:一尾狐 帖子:430 积分:4655 威望:0 精华:0 注册:2015/3/21 14:25:00
  发帖心情 Post By:2019/4/29 21:07:00 [显示全部帖子]

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目.table


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