- Foxtable(狐表) (http://foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2)
---- 求关于表的问题 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=104062)
-- 发布时间：2017/7/22 9:29:00
-- 求关于表的问题
有表a和表b他们都有5个列，且字段名和数据类型相同.我想求：当表a录入数据后，且第5列不为空时，触发程序将表a这一行的数据发送到表b，新建一行数据。谢谢！
-- 发布时间：2017/7/22 10:19:00
--
参考：http://www.foxtable.com/webhelp/scr/1451.htm
类似
Select Case e.DataCol.Name
Case "第一列","第二列","第三列","第四列","第五列"
Dim dr As DataRow = e.DataRow
Dim pr As DataRow
If dr.IsNull("第五列") =False Then
Dim filter As String
filter = "编号 = \'" & dr("编号") & "\'"
pr = DataTables("表B").Find(filter)
If pr Is Nothing Then
pr = DataTables("表B").AddNew
dr("编号 ") = pr("编号")
End If
dr("第一列") = pr("第一列")
dr("第二列") = pr("第二列")
......
End If
End Select
-- 发布时间：2017/7/22 20:12:00
-- 附件
老师你理解错了，我的本意是这样的，表A和表B没有必然的关联，只是他们的列名相同（即：A、B、C、D、E列），我的想法是：当表A增加一行后，如果E列不为空，那么则在
| 下载信息 [文件大小： 下载次数： ] | |
 点击浏览该文件:管理项目3.table |
表B里新增一行，并将表A的值付给表B对应的列。谢谢老师。
-- 发布时间：2017/7/23 10:08:00
--
| 下载信息 [文件大小： 下载次数： ] | |
| 点击浏览该文件:管理项目3.table |
-- 发布时间：2017/7/23 22:45:00
--
谢谢老师，测试过了很好用。再次谢谢