Looks good but you used the wrong slash on the /PRE tag to end it :)


>>
>>Hit reply to this message to see ther hidden HTML tags:
>>
>>
>>PROCEDURE dummy
>> IF oApp.IndentThis
>> This.Indented=.T.
>> ENDIF
>>ENDPROC
>>
>>
>
>I can't see the

 tags, but's lets try this.
>
>

>* Display all tables in a DBC.
>
>LOCAL lnTotTables, lnCurTable, lcCurTable
>LOCAL ARRAY laTables[1]
>
>IF NOT DBUSED( "Books")
>     OPEN DATABASE  Books
>ELSE
>     SET  DATABASE TO Books
>ENDIF
>
>lnTotTables = ADBOBJECTS( laTables, "Table")
>FOR lnCurTable = 1 TO lnTotTables
>     lcCurTable = laTables[ lnCurTable ]
>     ?lcCurTable
>ENDFOR
>
><\pre>

------------------------------------------------
John Koziol, ex-MVP, ex-MS, ex-FoxTeam.  Just call me "X"
"When the going gets weird, the weird turn pro" - Hunter Thompson (Gonzo) RIP 2/19/05