如ab表有szh,xh,ch,th,xm字段，想删除表中不重复的记录。如下表所示：
   szh      xh      th     xm
    1        1       2     张三
    1        1       2     张三
    1        1       3     李四
    1        1       3     李四
    1        1       4     王建
    1        1       5     刘东

    我的意思是想保留前面四个重复的记录，删除后面两个不重复的记录。 请给予指导，谢谢

USE AB
ALTER TABLE AB ADD S1 N(8)
ALTER TABLE AB ADD S2 N(8)
REPL ALL S1 WITH 1,S2 WITH RECN()
INDE ON STR(SZH)+STR(XH)+STR(TH)+XM TAG XM
TOTA ON STR(SZH)+STR(XH)+STR(TH)+XM FIEL S1 TO AC
SELE 0
USE AC
DELE FOR S1>1
PACK
SCAN
T2=S2
SELE AB
DELE FOR S2=T2
SELE AC
ENDS
CLOS DATA
USE AB
PACK


以上程序仅供参考。