以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  如何动态生成SQLTable  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=3975)
--  作者：狐哥
--  发布时间：2009/8/21 11:54:00
--  如何动态生成SQLTable
原来的DST可以从外总数据提取不同表
现在SQLTable如何生成.
--  作者：狐哥
--  发布时间：2009/8/21 12:02:00
--  
Dim cm As winform.combobox = e.form.Controls("combobox1")
Dim tx As winform.textbox = e.form.Controls("textbox3")
Dim cmd As New SQLCommand
cmd.外部数据 = "myacc"

Select Case cm.value
Case "柜号"
        cmd.CommandText = "SELECT * From {柜型柜号} WHERE 柜号 like \'%" & tx.text & "%\'"
        Tables("单证_Table3").DataSource = cmd.ExecuteReader()
end select

这个怎么没反应.
[此贴子已经被作者于2009-8-21 12:17:58编辑过]
--  作者：yangming
--  发布时间：2009/8/21 12:09:00
--  
这个后面被屏蔽了,再贴一下
cmd.C
--  作者：狐哥
--  发布时间：2009/8/21 12:19:00
--  

这个语句对吗

Tables("单证_Table3").DataSource = cmd.ExecuteReader()
--  作者：狐狸爸爸
--  发布时间：2009/8/21 12:45:00
--  
Fill方法

对于SQLTable和SQLQuery类型的Table，可以通过Fill方法动态设置数据，Fill方法的语法为：

Fill(SelectString, IsQuery)

或者

Fill(SelectString, ConnectionName, IsQuery)

SelectString：     Select语句
ConnectionName：   可选参数，指定数据源名称
IsQuery：          逻辑型，设为True，将生成SQLQuery型Table，否则生成SQLTable型Table.

例如：

Tables("窗口1_Table1").Fill("Select * From {客户}","nwnd",True)

不管Table原来显示的是什么数据，执行上述代码后，Table将显示mwnd数据源中的客户表数据。
--  作者：狐哥
--  发布时间：2009/8/21 13:52:00
--  
感谢狐爸,还没仔细看帮助,希望有时间及时更新帮助,我们好再系统学习.