数据接收表是关联表的情况下怎么办?DataTable和Table问题怎么处理?
Dim Filter As String
Dim kehu As String = e.Form.Controls("DropBox1").Value
Filter = Filter & " 收货仓 = '" & kehu & "'"
Dim f As New Filler
f.SourceTable = DataTables("装箱参数") '指定数据来源
f.SourceCols = "零件编码,零件图号,零件名称,装箱数量,单位" '指定数据来源列
f.DataTable = DataTables("销售出库.销售明细") '指定数据接收表
f.Filter = Filter
f.Fill() '填充数
Dim b As Table = Tables("销售出库.销售明细")
For r As Integer = 0 To b.Rows.Count - 1
b.Rows(r)("出库单号") = e.Form.Controls("TextBox1").Text
Next
For r As Integer = b.rows.Count - 1 To 0 Step -1
Next