当前位置: 代码迷 >> VFP >> 如何做二个VFP 表的同步
  详细解决方案

如何做二个VFP 表的同步

热度:755   发布时间:2013-02-26 00:00:00.0
怎么做二个VFP 表的同步?
ServerConnect   =   GetServerDBConnct();
Ac   =   SQLEXC(ServerConnect,   "Select   *   from   A ",   "A ")
//   这里存在一个表B。和A的结构一下。希望可以先把B的数据清空,然后把A数据拷过来??

不知道VFP6。0的语法怎么写?

------解决方案--------------------------------------------------------
1、在VFP9下,
DELETE FROM B
PACK
INSERT INTO B SELECT * FROM A
2、vfp6
select * from a into arra dd
use b
zap
appe from arra dd

------解决方案--------------------------------------------------------
方法一:


serverConnect = GetServerDBConnect()
Ac=SQLEXEC(ServerConnect , "Select * From SS1PRODM ", "SS1PRODM11 ")
USE SS1PRODM_SRM IN 0
sele ss1PRODM_SRM
ZAP
APPEND FROM dbf( 'SS1PRODM11 ')


方法二:

USE SS1PRODM_SRM
serverConnect = GetServerDBConnect()
Ac=SQLEXEC(ServerConnect , "Select * From SS1PRODM ", "SS1PRODM11 ")
sele ss1PRODM_SRM
ZAP
APPEND FROM dbf( 'SS1PRODM11 ')
USE SS1PRODM_SRM
------解决方案--------------------------------------------------------
ServerConnect = GetServerDBConnect()
Ac=SQLEXEC(ServerConnect, "Select * From SS1PRODM ", "SS1PRODM ")
USE SS1PRODM_SRM IN 0
SELECT SS1PRODM_SRM
ZAP
APPEND FROM DBF( 'SS1PRODM ')
CLOSE DATA ALL
update XX!GOODSINS set DSTATUS = 'Y ' where DSTATUS = 'N '
update XX!GOODSDEL set DSTATUS = 'Y ' where DSTATUS = 'N '
------解决方案--------------------------------------------------------
没有数据库呀。

因为没有数据库,我单独运行:
create database&table.prg
update ins and del status.prg
没有报错。


另外你说报错,报什么错呀,


我看了一下你的程序,用不着分这么多的PRG,这样吧,先停下来,不要往下做了,先下载一些例子参考一下后,再继续做。以下是一些程序的免费源代码

http://www.vfptop.com/dmfs.asp
http://hi.baidu.com/chinavfp/blog/item/109da4516f55e42542a75b98
这里有免费代码放送

163的VFP视频教程:
http://tech.163.com/special/t/000915SU/ttupfoxpro
  相关解决方案