>

LOCAL lnI, laDbfs[1]
>
>CREATE CURSOR badTables ;
>( ;
>    cName     c(40), ;
>    cMessage  c(200) ;
>)
>
>SELECT 0
>ADIR(laDbfs, "*.DBF")
>
>ON ERROR INSERT INTO badTables VALUES(laDbfs[lnI,1], MESSAGE())
>FOR lnI = 1 TO ALEN(laDbfs,1)
>    USE (laDbfs[lnI,1])
>NEXT
>ON ERROR
>
>SELECT badTables
>GOTO TOP
>BROWSE NOWAIT
>CANCEL
>

Rick

it is bad habit/coding to use a global vfp setting without resetting it to its previous. The use of 'ON ERROR' in this function as you advertize should be recoded to my opinion.

Rgds,

Koen