以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  如何高速合并  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=70323)
--  作者：yongxuanchen
--  发布时间：2015/6/19 0:01:00
--  如何高速合并

    您好，请问如果我想高速合并一个带有密码的数据库表ASCESS2003,代码能不能实现。

关键问题：我的数据库数据不希望别人能看到，因此，但我希望能在软件中同步，该如何处理，谢谢！
--  作者：sloyy
--  发布时间：2015/6/19 0:12:00
--  
轻而易举
--  作者：大红袍
--  发布时间：2015/6/19 0:32:00
--  

 为什么不把这个数据库当成数据源来用？
--  作者：yongxuanchen
--  发布时间：2015/6/19 13:06:00
--  问题
    首先局域网连接不能通用，第二，有时候不在一个办公室办公。
--  作者：大红袍
--  发布时间：2015/6/19 14:19:00
--  

 你可以做一个按钮，需要的时候才加入access作为数据源

 

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

 
--  作者：yongxuanchen
--  发布时间：2015/6/26 13:13:00
--  请问续
    你好，如果我需要合并一个数据表，但是合并时，能够根据设定的条件，将相同的内容忽略，只合并不同的行，怎样可以实现，谢谢。现在我在菜单中只用了
以下代码：Syscmd.Table.QuickMerge()，弹出的对话框怎么选都把表全部合并进来了，问怎样可以筛选。
--  作者：大红袍
--  发布时间：2015/6/26 14:06:00
--  

 编写代码合并 参考 http://www.foxtable.com/help/topics/2137.htm

 

 

 
--  作者：yongxuanchen
--  发布时间：2015/6/26 14:43:00
--  如何选择合并的表
   你提供的代码我试验成功了，但是又出现了一个问题，你提供的代码中指定了数据源，不能自定义自己需要合并的数据，怎么能够弹出一个对话框，像原来高速合并的那样，
能够自己选定数据源，又能实现第一段代码中的功能
--  作者：大红袍
--  发布时间：2015/6/26 14:54:00
--  

 参考代码

 

Dim dlg As new OpenFileDialog
dlg.Filter = "数据库|*.mdb"
If dlg.ShowDialog = DialogResult.OK Then
    Connections.Add("test","Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & dlg.FileName & ";Persist Security Info=False")
    Dim cmd As New SQLCommand
    cmd.ConnectionName = "test"

 

    \'合并代码


    Connections.Delete("test")
End If

[此贴子已经被作者于2015/6/26 14:53:55编辑过]
--  作者：yongxuanchen
--  发布时间：2015/6/26 15:35:00
--  十分感谢你的代码
    十分感谢你的代码，功能已经能够实现了。现在我想再问一下，如果出厂编号相同，我把新表的内容覆盖掉旧表的能不能实现，谢谢。我现在合并的代码是如下：