没难度的,就是选择2条数据,然后把数据交换位置。
最简单的方法就是,分别把2条数据放到数组去,然后交换。
你这个,是交换班级资料,其他的不交换,
如下,是整个记录交换的列子。
CREATE CURSOR t1(a1 I,a2 I,a3 I)
FOR I=1 TO 10
INSERT INTO T1(A1,A2,A3) VALUES(I,I*10,I*100)
ENDFOR
BROWSE
&&取第2条记录为需要交换的数据1
GO 2
SCATTER TO Ary1
&&取第8条记录为需要交换的数据2
GO 8
SCATTER TO Ary2
&&交换数据
DIMENSION Ary3(ALEN(Ary1))
FOR i=1 TO ALEN(ary1)
Ary3(i)=Ary1(i)
Ary1(i)=Ary2(i)
Ary2(i)=Ary3(i)
ENDFOR
&&回写到表
GO 2
FOR J=1 TO FCOUNT()
REPLACE (FIELD(J)) WITH Ary1(J)
ENDFOR
GO 8
FOR J=1 TO FCOUNT()
REPLACE (FIELD(J)) WITH Ary2(J)
ENDFOR
BROWSE
[
本帖最后由 mywisdom88 于 2015-9-17 14:47 编辑 ]