以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  求帮助，我想把组合框字符串当成表名用  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=83760)
--  作者：limit_1982
--  发布时间：2016/4/16 2:10:00
--  求帮助，我想把组合框字符串当成表名用

下面错哪里了

 

Dim wfc As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim cp As String
cp = wfc.Value
Dim jb As New SQLJoinTableBuilder("查询表1","\'" & cp & "\'")
jb.Connection　链接名　Name = "Sale"  
jb.AddTable("\'" & cp & "\'","产品ID","产品","产品ID")
jb.AddTable("\'" & cp & "\'", "客户ID","客户","客户ID")
jb.AddExp("产品","产品名称")
jb.AddCols("日期", "数量","单价")
jb.AddExp("金额","数量 * 单价")
jb.Filter="{客户}.客户ID=\'C01\'"
jb.Build()
MainTable = Tables("查询表1")

 

 

先谢谢....

[此贴子已经被作者于2016/4/16 2:18:35编辑过]
--  作者：Hyphen
--  发布时间：2016/4/16 10:11:00
--  
Dim wfc As WinForm.ComboBox = e.Form.Controls("ComboBox1")
Dim cp As String 
cp = wfc.Value
Dim jb As New SQLJoinTableBuilder("查询表1",cp)
jb.Connection 链接名 Name = "Sale"   
jb.AddTable(cp,"产品ID","产品","产品ID")
jb.AddTable(cp, "客户ID","客户","客户ID")
jb.AddExp("产品","产品名称")
jb.AddCols("日期", "数量","单价")
jb.AddExp("金额","数量 * 单价")
jb.Filter="{客户}.客户ID=\'C01\'"
jb.Build()
MainTable = Tables("查询表1")