以文本方式查看主题

-  Foxtable(狐表)  (http://www.foxtable.com/bbs/index.asp)
--  专家坐堂  (http://www.foxtable.com/bbs/list.asp?boardid=2)
----  如何用代码 加载外部数据库所有表？  (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=58134)
--  作者：jswjyjf
--  发布时间：2014/10/12 10:05:00
--  如何用代码 加载外部数据库所有表？
如何用代码 加载外部数据库所有表？
--  作者：有点甜
--  发布时间：2014/10/12 10:11:00
--  

 加载表？你得先添加外部表进入foxtable你才能加载的。

 

 或者参考

 

http://www.foxtable.com/help/topics/1943.htm

 

http://www.foxtable.com/help/topics/1279.htm

 
--  作者：jswjyjf
--  发布时间：2014/10/12 11:31:00
--  

说错了 我的意思是如何用代码 添加数据库所有外部表？
--  作者：有点甜
--  发布时间：2014/10/12 11:34:00
--  
 不行。
--  作者：jswjyjf
--  发布时间：2014/10/12 11:54:00
--  

可以的

Dim q As new OuterTableBuilder
q.TableName = "仓库"
q.TableCaption = "仓库"
q.C
q.SelectString = "Select * From {仓库} "
q.Build
--  作者：有点甜
--  发布时间：2014/10/12 11:56:00
--  
 但是这种，不是添加外部表，你不能设置表事件代码设置样式等等的。
--  作者：jswjyjf
--  发布时间：2014/10/12 11:56:00
--  
Dim q As new OuterTableBuilder
q.TableName = "仓库"
q.TableCaption = "仓库"
q.C
q.SelectString = "Select * From {仓库} "
q.Build
--  作者：jswjyjf
--  发布时间：2014/10/12 12:00:00
--  

我现在是想把一个数据库acess 中的所有表重定向到sql中去，我新建了一个项目，添加外部数据源acess ,然后添加外部表，因为acess 库中表很多，逐个添加很耗时，因此 我想用代码一次性添加到项目中去
--  作者：有点甜
--  发布时间：2014/10/12 12:01:00
--  

 这个用代码是做不到的。
--  作者：jswjyjf
--  发布时间：2014/10/12 12:05:00
--  
Dim q As new OuterTableBuilder
Dim lst As List(Of String)
lst = Connections("gg").GetTableNames
For Each nm As String In lst
q.TableName =nm
q.TableCaption =nm
q.C
q.SelectString = "Select * From {nm} "
q.Build
Next