以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何把一个表中符合条件的某些记录移到另外一个表中  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=53329)

--  作者:CBSLULU33
--  发布时间:2014/7/4 22:09:00
--  如何把一个表中符合条件的某些记录移到另外一个表中
向专家请教了:如附件中的表,我如何将库存信息表中符合某些条件,如"钢瓶状态 = 销售出库" 的记录移植到后台的"钢瓶日志表"中去(是移植而不是复制,就是库存信息表中就没有这些记录了,转而到钢瓶日志表中),谢谢!
 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:boc库存及订单管理项目.zip


--  作者:y2287958
--  发布时间:2014/7/4 22:16:00
--  
复制后删除不行吗
--  作者:CBSLULU33
--  发布时间:2014/7/4 22:22:00
--  
以下是引用y2287958在2014-7-4 22:16:00的发言:
复制后删除不行吗

我是想在库存信息表中每条记录前有复选框,当符合钢瓶状态= 销售出库的记录被筛选出来时,勾选这些记录后,触发怎样一个事件后就被移植到 日志信息表中了,当然您说的也可以,只是想更便捷一些,顺便问一下,怎样做能一键全部勾选记录,谢谢!


--  作者:y2287958
--  发布时间:2014/7/4 22:24:00
--  
我在附件中找不到“库存信息表”
建议单独做个例子

--  作者:CBSLULU33
--  发布时间:2014/7/4 22:42:00
--  
不好意思,其实是叫入库明细表,谢谢
--  作者:y2287958
--  发布时间:2014/7/4 22:51:00
--  
http://www.foxtable.com/help/topics/2292.htm
看看有没有参考意义

--  作者:CBSLULU33
--  发布时间:2014/7/5 11:53:00
--  
谢谢您的提示,那请问以下的意思用这样一段代码来表达正确吗?

意思:如果表A的"钢瓶状态"字段显示结果为"销售出库",则这条记录全部复制到表B

If e.DataCol.Name = "逻辑列名" AndAlso e.DataRow("逻辑列名") = "销售出库" Then
     Dim dr As DataRow = DataTables("表B").AddNew
     
For Each dc As DataCol In DataTables("B").DataCols
         dr(dc.Name) = e.DataRow(dc.Name)
     
Next
End
 If

--  作者:Bin
--  发布时间:2014/7/5 14:28:00
--  
对的.把列名改一下即可
--  作者:inf9
--  发布时间:2019/7/16 9:32:00
--  
品名及规格