Enumearte Tables in another Database

Here is an example of AutoScript about enumerating the tables that exists in another database.

con_str = "Provider=Microsoft.Jet......"         {....define the connection string}
con       = OpenDBConnection(con_str)         {....connect to database and return handler}
tlist   = GetDBConnTableNames(con)            {....load the table names into a list}
tcount  = GetLstCount(tlist)                         {....enumerate the items in the list (tables)} 
for i = 0 to tcount-1
    
tname = GetLstItem(tlist,i)                     {....get table name of (i)th list item}
    
call trace("tname=",tname)                     {....write to kosmos*.log for latter inspection}
next
call CloseDBConnection(con)                        {....close and free the database connection}
call FreeLst(tlist)                                         {....free the list with table names}