以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  新增行跨表引用多行数据  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=17931)

--  作者:大明
--  发布时间:2012/3/29 8:49:00
--  新增行跨表引用多行数据

论坛里有一实例,新增行的跨表引用:在表B的DK列中新增表A的DK列中行的数据,表B账截日列中自动填入表A相应DK列中账截日数据。

我想解决的问题是假如表A相应DK列中账截日数据不是唯一的,比如表A的DK列有一行数值为1,假如账截日有多行数据对应DK。是否能在表B新增DK数据时实现多行引用。谢谢

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

是否要做个判断,判断符合条件的行的数量,数量有多少行就新增多少行符合条件的数据。找不到此类的案例。请高手赐代码谢谢

[此贴子已经被作者于2012-3-29 9:30:43编辑过]

--  作者:狐狸爸爸
--  发布时间:2012/3/29 10:13:00
--  

做个小窗口,一个文本框输入禁止日,一个按钮用于确定增加,按钮代码:

 

 

Dim jzr as Integer = e.form.Controls("截止日输入框").Value
For Each dr1 As DataRow In DataTables("表A").Select("账截日  = " & jzr )
    Dim r2 As Row = Tables("表B").AddNew
    r2("DK") = dr1("DK")
    r2("账截日") = jzr
Next


--  作者:大明
--  发布时间:2012/3/29 14:58:00
--  

谢谢狐狸爸爸,辛苦啦。

学生不才,按照狐爸的代码做了,没有测试成功,检查表的数据类型没有错误,我仔细学习一下午了,麻烦再次指点。

[此贴子已经被作者于2012-3-29 15:05:02编辑过]

--  作者:blackzhu
--  发布时间:2012/3/29 15:17:00
--  
账截日   看看什么类型的列,应该是数值列
--  作者:大明
--  发布时间:2012/3/29 15:20:00
--  
账截日是整数型狐爸的代码没错。谢谢
--  作者:狐狸爸爸
--  发布时间:2012/3/29 16:59:00
--  
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目2.table