lnFh1 = FOPEN("orders.dbf") >* Position of the first data record - 2 bytes >= FSEEK(lnFh1, 8, 0) >lcB1 = FREAD(lnFh1,1) >lcB2 = FREAD(lnFh1,1) >* Offset to the beginning of the DBC name >lnOffset = ASC(lcB2) * 256 + ASC(lcB1) - 264 - 1 >= FSEEK(lnFh1, lnOffset, 0) >* The first byte of DBC name or 0x00 if it's free table >lcB3 = FREAD(lnFh1, 1) >IF ASC(lcB3) = 0 > * free table >ELSE > * table in dbc >ENDIF >= FCLOSE(lnFh1) >Sorry, but there's a bug in the code. The line