我同学的单位上了ERP,他想对ERP数据库(用的SQL SERVER2000)中的表进行某些操作。故在自己的机器上建了一个数据库。请问如何做到数据同步更新呢?说明一点。表结构基本上跟ERP数据库表中的相同,只是有的表中加上了几个字段。如果ERP允许修改数据库,直接把字段加到表中,然后对数据库操作就可以了,但ERP不允许修改数据库。要求尽量不要对ERP数据库进行操作。怎么实现呢??
解决方案 »
- 困扰多日,ADODB更新Access中通过ODBC连接到SQLServer中还有bit类型的表的问题
- goto
- 写CheatEngine TUT第7关的BOT
- vb A程序已经运行,窗口被最小化,我想再次双击A程序时弹出已经运行的窗口
- windows2003 设置VPN用VB怎么访问VPN服务器SQL???急啊
- 帮我想想哪错了`(关于架设WEB服务器的)
- 经典库存报表数据库设计文档---在线等!
- 紧急高薪请GIS软件工程师(兼职也可以)
- 打包发布时提示msado15.tlb自注册失败?
- 一直想做一个网页插件,不知道能否实现,知道的大侠给个思路
- 高分请教如何用shell函数打开一个非exe文件?
- 高手请进,图像问题!
你可以试试.
Private Sub Form_Load()
Dim dbNwind As Database'如果末引用DAO则一定要先引用Dim prpNew As Property '属性变量Set dbNwind = OpenDatabase(App.Path & "\sdaf.mdb", True) '打开被复制的数据库With dbNwind' 建立Replicable属性,如果已经存在该属性则程序略过这一步On Error Resume NextSet prpNew = .CreateProperty("Replicable", dbText, "T") '为母本数据库生成可复制属性.Properties.Append prpNew '为母本数据库添加可复制属性'设置数据库的Replicable属性为True.Properties("Replicable") = "T"
.MakeReplica App.Path & "\ss.mdb", "copy of sdaf.mdb" '生成副本ss.mdb
.CloseEnd With
End SubPrivate Sub Timer1_Timer()Dim dbNwind As DatabaseSet dbNwind = OpenDatabase(App.Path & "\sdaf.mdb", True)dbNwind.Synchronize App.Path & "\ss.mdb", dbRepExportChanges '同步,SS既为数据库副本
End Sub
你可以仿照这个ACCESS例程来同步那个数据库,关键是你有没有足够的权限。再者SQL有这种功能。
或者象楼上说的那样.设置同步.
但不知道表中的字段不同后是否可以.我没有试过.另外.最近很少用sql server.所以不是很清楚这个问题.
Google上没有么?