|
#2
csyx2023-10-10 22:17
|
程序代码：****找出两个表中的不同记录***vfp6.0
SET SAFET OFF
create tabl aa (xh n(4))
insert into aa values(1001)
insert into aa values(1002)
insert into aa values(1003)
insert into aa values(1005)
insert into aa values(2005)
create tabl bb (xh n(4))
insert into bb values(1001)
insert into bb values(1002)
insert into bb values(1003)
insert into bb values(1004)
insert into bb values(2008)
create tabl bdxh(表名 c(10),xh N(4),备注 c(10))
SELE "AA表" AS 表名,xh,"BB表无" as 备注 from aa where xh not in(sele xh from bb) into tabl AAXH
SELE "BB表" AS 表名,xh,"AA表无" as 备注 from bb where xh not in(sele xh from aa) into tabl BBXH
sele bdxh
append from AAXH
append from bbXH
brow
copy to bdxh type xls
说明：aa,bb 是原始数据表，该程序得到bdxm.xls后，所在的文件夹里不想产生bdxh、aaxh、bbxh 三个dbf表 有没有好的办法。 SET SAFET OFF
create tabl aa (xh n(4))
insert into aa values(1001)
insert into aa values(1002)
insert into aa values(1003)
insert into aa values(1005)
insert into aa values(2005)
create tabl bb (xh n(4))
insert into bb values(1001)
insert into bb values(1002)
insert into bb values(1003)
insert into bb values(1004)
insert into bb values(2008)
create tabl bdxh(表名 c(10),xh N(4),备注 c(10))
SELE "AA表" AS 表名,xh,"BB表无" as 备注 from aa where xh not in(sele xh from bb) into tabl AAXH
SELE "BB表" AS 表名,xh,"AA表无" as 备注 from bb where xh not in(sele xh from aa) into tabl BBXH
sele bdxh
append from AAXH
append from bbXH
brow
copy to bdxh type xls
这么简单的问题都不知道是什么原因吗？
