以下是引用Fotable在2012-9-21 23:36:00的发言：
然后我有想了第二个方法 利用adoxbuilder
Dim Builder As New
ADOXBuilder(connection1)
Dim tbl As ADOXTable
Dim lst As List(Of String)
lst = Connections(connection1).GetTableNames
For Each nm As String In lst
Builder.Open()
tbl = Builder.Tables(nm) '创建表
Builder.AddTable(tbl) '增加表
Builder.Close()
next
这个方法报错
[此贴子已经被作者于2012-9-21 23:38:13编辑过]
Dim
Builder As New
ADOXBuilder(connection1) 去掉数据源
tbl = Builder.Tables(nm) 创建表是 Builder.NewTable(nm)
但这样是复制表，与外部数据源就无关了。
建议还是使用2楼的方法，每次项目启动的时候添加进来。（狐表可能也是这样干的）
加好友 
发短信
Post By：2012/9/22 9:22:00 [显示全部帖子]
