现在需要做的事情是把history.dbf的6个号码和ssq.dbf里的6个号码逐一对比,
如何对比,如:history.dbf中有一条记录6个号码分别为:010203040608;ssq.dbf中有一条记录6个号码分别为:050607080910。如何比较,请楼主说明。
坚守VFP最后的阵地
lc=[050607080910] *CREATE CURSOR t (R0 N(4),R1 N(4),R2 N(4),R3 N(4),R4 N(4),R5 N(4),R6 N(4)) SELECT PADL(N1,2,[0])+[,]+PADL(N2,2,[0])+[,]+PADL(N3,2,[0])+[,]+PADL(N4,2,[0])+[,]+PADL(N5,2,[0])+[,]+PADL(N6,2,[0]) JH,0000 JS FROM HISTORY INTO CURSOR T1 READWRITE FOR I=1 TO LEN(LC) REPLACE ALL JH WITH STRTRAN(JH,SUBSTRC(LC,I*2-1,2),[]) IN T1 ENDFOR REPLACE ALL JS WITH (17-LEN(ALLTRIM(JH)))/2 IN T1 SELECT JS,COUNT(JS) FROM T1 GROUP BY JS