Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter= "Access文件|*.mdb" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
Dim mg As New Merger
mg.SourcePath = dlg.FileName
mg.SourceTableName = "
mg.Merge()
End If
MessageBox.Show("您无此权限!")
End If
我的代码合并后不能覆盖相同数据,又新增了一行,版主怎样写代码,能够覆盖更新原数据。谢谢!
[此贴子已经被作者于2015-1-22 21:13:22编辑过]