现有窗口表(tables("窗口1_table1"))邦定到内部表"表A",连接到外部数据源("test1")现卸载这个窗口表,然后删除数据源("test1")
再重新加载这个窗口表,然后连接到外部数据源("test2")
现在有一个问题,就是窗口表卸载后,不知道如何加载?
Dim sql As String
...
tables("窗口1_table1").fill(sql,"test1",True)
Dim s As String =""
'遍历当前属于此数据源的表
For Each dt As DataTable In DataTables
If dt.c Then
s += "|" & dt.name
End If
Next
s = s.Trim("|")
'卸载表
If s > "" Then
DataTables.Unload(s) '这时窗口表(tables("窗口1_table1"))消失
End If
Connections.Delete("test1") '删除数据源"test1"
........'如何重新加载窗口表?
Connections.Add("test2","test2的链接字符串")
...
tables("窗口1_table1").fill(sql,"test2",True)
[此贴子已经被作者于2022/8/16 15:20:08编辑过]