以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  用select提取的行集合如何进行填充?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=1653)
--  作者：菜鸟foxtable
--  发布时间：2009/1/18 10:29:00
--  用select提取的行集合如何进行填充?
由于不想用Filler函数填充,所以想问下,用select提取的行集合如何进行填充?
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:跨表填充测试.table


提取符合ComboBox1值的数据行集合,填充到跨表填充表里....
提取按钮中代码如下
Dim str As string = e.form.Controls("ComboBox1").Value
Dim drs As List(Of DataRow)
drs = DataTables("订单").Select("[雇员]= \'"& str &"\'")
后面的不会了....
[此贴子已经被作者于2009-1-18 10:30:26编辑过]
--  作者：狐狸爸爸
--  发布时间：2009/1/18 11:26:00
--  

For each dr as DataRow in drs
   dim r As DataRow = DataTables("表").AddNew()
   r("某列1") = dr("某列1")
   r("某列2") = dr("某列2")
   ....
Next