以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  请教下SQLJoinTableBuilder  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=14759)

--  作者:狐友
--  发布时间:2011/12/1 0:37:00
--  请教下SQLJoinTableBuilder

有个窗口里有几个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编辑过]

--  作者:狐狸爸爸
--  发布时间: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("销售查询")