VFP查询
在一个表中查询
表1:
a1 , a2
1 , 2
3 , 5
2 , 6
6 , 7
7 , 9
查询 a2为9的 a1值，若a2有等于a1值，继续查询
结果为
a1,a2
1，2
2，6
6，7
7，9
[解决办法]
CREATE CURSOR 表1 (A1 I,A2 I)
INSERT INTO 表1 VALUES (1,2)
INSERT INTO 表1 VALUES (2,6)
INSERT INTO 表1 VALUES (3,5)
INSERT INTO 表1 VALUES (6,7)
INSERT INTO 表1 VALUES (7,9)
CREATE CURSOR 表2 (A1 I,A2 I)
SELECT 表1
NUM=9
L=.T.
DO WHILE L
LOCATE FOR A2=NUM
IF FOUND()
NUM=A1
SELECT 表2
INSERT INTO 表2 VALUES (表1.A1,表1.A2)
SELECT 表1
LOOP
ELSE
L=.F.
ENDIF
ENDDO
SELECT * FROM 表2 ORDER BY A2
