Foxtable(狐表)用户栏目专家坐堂 → [求助]窗口表数据


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

主题:[求助]窗口表数据

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


加好友 发短信
等级:婴狐 帖子:7 积分:255 威望:0 精华:0 注册:2015/3/5 14:05:00
[求助]窗口表数据  发帖心情 Post By:2015/10/10 11:17:00 [只看该作者]

表”送货“中的查询窗口表绑定的是”订单“表的副本,希望双击订单表的项目,自动在”销售“表中新增对应的数据(数据主要有当前"送货"表的OUTID,"订单"表的POID及数量),同时将删除窗口表的该项数据。
备注:”送货“与”销售“表通过"OUTID"关联,
求解窗口表的DoubleClick事件

可能是我表达有误,请参考附件实例中,帮忙解决,谢谢
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目5.zip

[此贴子已经被作者于2015/10/10 11:44:49编辑过]

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2015/10/10 11:23:00 [只看该作者]

if e.Table.Name = "窗口1.Table1"  AndAlso e.Col.Name = "项目" Then

    e.Cancel = True

    Dim pr As DataRow = e.Row.DataRow.GetParentRow("销售") 

    pr("数量")  = pr("数量") + e.DataRow("数量")

    e.Row.Delete

End If

 


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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/10/10 11:30:00 [只看该作者]


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


加好友 发短信
等级:婴狐 帖子:7 积分:255 威望:0 精华:0 注册:2015/3/5 14:05:00
  发帖心情 Post By:2015/10/10 11:46:00 [只看该作者]

可能是我表达有问题,麻烦老师参考附件帮忙解决,谢谢

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


加好友 发短信
等级:狐神 帖子:5015 积分:25363 威望:0 精华:0 注册:2015/8/18 9:21:00
  发帖心情 Post By:2015/10/10 12:01:00 [只看该作者]

就是销售表的DoubleClick事件,加上判断

 

If e.Table.Name = "送货.销售" Then
    msgbox("OUTID:" & e.Row("OUTID"))
End If


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


加好友 发短信
等级:婴狐 帖子:7 积分:255 威望:0 精华:0 注册:2015/3/5 14:05:00
  发帖心情 Post By:2015/10/10 12:36:00 [只看该作者]

Hyphen 老师的回答解决不了我的问题,谢谢

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


加好友 发短信
等级:贵宾 帖子:39310 积分:196782 威望:0 精华:1 注册:2015/4/25 9:23:00
  发帖心情 Post By:2015/10/11 11:37:00 [只看该作者]

e.Cancel = True
Dim nr As Row = Tables("送货.销售").Addnew
nr("POID") = e.Row("id")
nr("送货数量") = e.Row("数量")
e.Row.Delete

 回到顶部