cd path_where_dbfs_are CREATE DATABASE MyData numb_of_dbfs = ADIR(allDBF, "*.DBF") FOR i = 1 TO m.numb_of_dbfs dbf_name = JUSTSTEM(allDBF[i,1]) USE (dbf_name) IF EMPTY(CURSORGETPROP("DataBase", dbf_name)) && To see if this table is FREE SET DATABASE TO MyData ADD TABLE (dbf_name) ENDIF USE IN SELECT(dbf_name) NEXT CLOSE DATABASE ALL(not tested)