>>How can I put the table names from a database into an array?
>>
>>Thanks
>
>John, use ADBOBJECTS() function.
>
>Nick

Hi Nick,

Thanks for the info on ADBOBJECTS(), that however will not work in this situation. I ended up with the following in the interactivechange of the list box where I put a list of databases in the directory that was selected. The code seems to work ok.

SELECT ;
ObjectName ;
FROM (This.Value) ;
WHERE ObjectType = "Table" ;
INTO ARRAY ThisForm.aTableList

SELECT (This.Value)
USE

IF _Tally > 0
ThisForm.lstTables.RowSourceType = 5
ThisForm.lstTables.RowSource = "ThisForm.aTableList"
ELSE
ThisForm.lstTables.RowSourceType = 0
ThisForm.lstTables.RowSource = ""
ENDIF