LOCAL i, aCursors[1] AMEMBERS(aCursors, oForm.DataEnvironment, 2) WITH oForm.DataEnvironment .CloseTables() FOR i = 1 to ALEN(aCursors) WITH EVAL("." + aCursors[i]) IF .BaseClass = "Cursor" .CursorSouce = "foo" .DataBase = "d:\allfoopath\allfoo.dbc" ENDIF ENDWITH ENDFOR IF .AutoOpenTables .OpenTables() ENDIF ENDWITH