以文本方式查看主题 - Foxtable(狐表) (http://foxtable.com/bbs/index.asp) -- 专家坐堂 (http://foxtable.com/bbs/list.asp?boardid=2) ---- 请教删除数据源 (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=154316) |
-- 作者:hb8888 -- 发布时间:2020/9/10 23:06:00 -- 请教删除数据源 大师:大师删除一数据源,提示正在使用,不可删除。如果卸载该数据源的表后(是窗口中的表),运行以后又提示窗口中的表控件不存在,怎么回事?以前好好的。 |
-- 作者:hb8888 -- 发布时间:2020/9/10 23:08:00 -- Dim ErrMsg1 As String Dim Conn1 As String = ljzfc \'----连接字符串---- If Connections.TryConnect(Conn1,ErrMsg1) = False Then \'----创建数据源---- MessageBox.Show(ErrMsg1) Else If Connections.Contains("lssjyexl") = False Then Connections.Add("lssjyexl",Conn1) Else Dim bjh As new List(of String) For Each dt As DataTable In DataTables If dt.C Then If DataTables.Contains(dt.name) = True Then bjh.Add(dt.name) End If End If Next For Each a As String In bjh DataTables.Unload(a) Next MessageBox.Show(3) Connections.Delete("lssjyexl") MessageBox.Show(4) Connections.Add("lssjyexl",Conn1) MessageBox.Show(5) |
-- 作者:hb8888 -- 发布时间:2020/9/10 23:36:00 -- 如果窗口中的表通过DataSource绑定到外部数据源的表,那么我删除数据源时,提示该数据源正在使用,怎么办? |
-- 作者:有点蓝 -- 发布时间:2020/9/11 8:51:00 -- 方法1、在关闭窗口后再删除连接 2、可以这样 If Connections.Contains("t") DataTables.Unload("窗口2_Table1") Connections.Delete("t") End If 但是这个用法会同时把窗口表控件也删除了,需要关闭重新打开窗口才能使用。 如果还要继续使用这个窗口表,需要另外创建,建议使用动态创建表控件的方式添加窗口表:http://www.foxtable.com/webhelp/topics/1919.htm |