以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]修改daima  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=99883)

--  作者:xh2207
--  发布时间:2017/4/28 15:55:00
--  [求助]修改daima

各大侠,请指教,谢谢!

有2表:订货主表和订货明细,两表无任何关联

有一需求窗口,窗口有修改、保存按键。

问题:现在需求窗口录入后,发现订单号录入错误,想修改正确订单号,如何编写代码实现:按上一条或下一条,选中要修改的订单号,按修改健后将整确的单号填入保存,订货主表的单号是更正过后的单号,但订货明细的单号依然是修改前的单号,如何实现明细表的订单号也是修正后的订单号?


--  作者:xh2207
--  发布时间:2017/4/28 15:56:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目69_201704281540.zip


--  作者:有点色
--  发布时间:2017/4/28 16:06:00
--  

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


--  作者:xh2207
--  发布时间:2017/4/28 16:10:00
--  
有点色,你的版本太高,我打不开。
--  作者:有点色
--  发布时间:2017/4/28 16:12:00
--  

DataColChanged事件,写代码

 

If e.DataCol.name = "订单号" Then
    If e.OldValue = Nothing Then
        DataTables("订货明细表").ReplaceFor("订单号", e.NewValue, "订单号 is null")
    Else
        DataTables("订货明细表").ReplaceFor("订单号", e.NewValue, "订单号 = \'" & e.OldValue & "\'")
    End If
End If


--  作者:xh2207
--  发布时间:2017/4/28 16:13:00
--  
小狗到期,不能升级了。图片点击可在新窗口打开查看
--  作者:xh2207
--  发布时间:2017/4/28 16:18:00
--  
商业版小狗到期,无法打开,有那个狐友帮下忙,转成试用版,谢谢。
--  作者:xh2207
--  发布时间:2017/4/28 16:20:00
--  

谢谢,谢谢!