Foxtable(狐表)用户栏目专家坐堂 → 请教下SQLJoinTableBuilder


  共有9981人关注过本帖树形打印复制链接

主题:请教下SQLJoinTableBuilder

帅哥哟,离线,有人找我吗?
狐友
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:幼狐 帖子:110 积分:1367 威望:0 精华:0 注册:2008/9/1 12:35:00
请教下SQLJoinTableBuilder  发帖心情 Post By: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楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251048 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By: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("销售查询")


 回到顶部