>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 >>