>>IF !DIRECTORY( 'C:\DELME') >> MD C:\DELME >>ENDIF > > >>CREATE TABLE C:\DELME\X1 (F01 C(5)) >>FOR lnCnt = 1 TO 10000 >> INSERT INTO X1 (F01) VALUES (SPACE(5)) >>ENDFOR >>REPLACE ALL F01 WITH TRANSFORM( RECNO()) >>USE IN X1 >> >>lcCS = [Driver=Microsoft Visual Foxpro Driver;SourceDB=C:\DELME\;SourceType=DBF;Exclusive=No; >BackgroundFetch=Yes;Collate=Machine;Null=Yes;Deleted=Yes;] >>lnH = SQLSTRINGCONNECT( lcCS) >> >>LOCAL lcSQL >>lcSQL = [ SELECT F01 FROM C:\X1] >>?SQLE( lnH , lcSQL, '_cT1') >>?SQLDISCONNECT( lnH) >> >>SELECT '1', CNT(*),F01 FROM _CT1 GROUP BY 3 ORDER BY 1 DESC HAVING CNT(F01)>1 INTO CURSOR _cT1X >>BROW >>>>