以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  请教下这个代码  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=14400)
--  作者：狐友
--  发布时间：2011/11/18 10:25:00
--  请教下这个代码
在库存表里根据产品名，把明细表相同产品名的数据连接在一起 ，谢谢
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:管理项目1.table
--  作者：程兴刚
--  发布时间：2011/11/18 11:04:00
--  
类似的问题,请直接贴出代码,俺的手机功能太差打不开狐表!
--  作者：狐狸爸爸
--  发布时间：2011/11/18 11:14:00
--  

在命令窗口执行：

 

For Each dr1 As DataRow In DataTables("库存").DataRows
    Dim nms As String = DataTables("明细").GetComboListString("批次","产品名称 = \'" & dr1("产品名称") & "\'")
    dr1("库存状态") = nms.Replace("|"," ")
Next

[此贴子已经被作者于2011-11-18 11:17:14编辑过]