以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 日期列同步问题 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=106981) |
-- 作者:恒隆君 -- 发布时间:2017/9/19 15:50:00 -- 日期列同步问题 在表刀具库位 同步刀具编号 时,入库日期会根据收货日期(在表 刀具收货)更新。 当我同步表时,入库日期又清空了。 没有找到原因 Datacolchanged \' 入库日期与 刀具收货表的收货日期 同步更新 If e.DataCol.Name = "刀具编号" Then \'如果内容发生变动的是刀具编号列 If e.NewValue Is Nothing Then \'如果新值是空白,也就是刀具编号列的内容为空 e.DataRow("入库日期") = Nothing \'那么清空此行刀具编号列的内容 Else Dim dr As DataRow \'否则在产品表查找同名的刀具编号行,将找到的行赋值给变量dr dr = DataTables("刀具收货").Find("[刀具编号] = \'" & e.NewValue & "\'") If dr IsNot Nothing Then \'如果找到了同名的刀具编号行,也就是dr不是Nothing e.DataRow("入库日期") = dr("收货日期") End If End If End If [此贴子已经被作者于2017/9/19 16:08:35编辑过]
|
-- 作者:恒隆君 -- 发布时间:2017/9/19 17:28:00 -- 我是从Excel 高速合并 导入的数据 |
-- 作者:有点甜 -- 发布时间:2017/9/19 18:53:00 -- 看看是否这个问题? http://www.foxtable.com/webhelp/scr/1380.htm
|