标题：请教下SQLJoinTableBuilder

1楼

狐友发表于：2011/12/1 0:37:00

有个窗口里有几个combobox的控件，想根据这几个控件的输入值来加载生成查询表，

执行不了，请教下，谢谢

Dim c3 As WinForm.ComboBox = e.Form.Controls("ComboBox3")

Dim c4 As WinForm.ComboBox = e.Form.Controls("ComboBox4") '
Dim jb As New SQLJoinTableBuilder("销售查询","table_7")
jb.AddTable("table_7","订单编号","table_6","订单编号")
jb.AddCols("{table_6}.订单编号","销售区域","订单性质","订单日期","客户名称","产品名称及规格","产品单价","产品数量")
jb.Filter = "销售区域 = '"&c4&"' and 销售区域 = '"&c3&""
jb.Build()
MainTable = Tables("销售查询")

[此贴子已经被作者于2011-12-1 0:40:12编辑过]

2楼

狐狸爸爸 发表于：2011/12/1 8:12:00

Dim c3 As String = e.Form.Controls("ComboBox3").Value

Dim c4 As String = e.Form.Controls("ComboBox4").Value
Dim jb As New SQLJoinTableBuilder("销售查询","table_7")
jb.AddTable("table_7","订单编号","table_6","订单编号")
jb.AddCols("{table_6}.订单编号","销售区域","订单性质","订单日期","客户名称","产品名称及规格","产品单价","产品数量")
jb.Filter = "销售区域 = '"& c4 &"' and 销售区域 = '" & c3 & ""
jb.Build()
MainTable = Tables("销售查询")

共2 条记录, 每页显示 10 条, 页签: [1]